rsin A (should all be same)

Time bar (total: 5.3s)

start0.0ms (0.0%)

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

analyze336.0ms (6.3%)

Memory
-3.6MiB live, 345.1MiB allocated; 184ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0.0%0.0%99.9%0.1%0.0%0.0%0.0%0
0.0%0.0%99.9%0.1%0.0%0.0%0.0%1
0.0%0.0%99.9%0.1%0.0%0.0%0.0%2
0.0%0.0%99.9%0.1%0.0%0.0%0.0%3
0.0%0.0%99.9%0.1%0.0%0.0%0.0%4
0.0%0.0%99.9%0.1%0.0%0.0%0.0%5
0.0%0.0%99.9%0.1%0.0%0.0%0.0%6
12.5%12.5%87.4%0.1%0.0%0.0%0.0%7
12.5%12.5%87.4%0.1%0.0%0.0%0.0%8
18.8%18.7%81.1%0.1%0.0%0.0%0.0%9
21.9%21.8%78.0%0.1%0.0%0.0%0.0%10
21.9%21.8%78.0%0.1%0.0%0.0%0.0%11
23.4%23.4%76.5%0.1%0.0%0.0%0.0%12
Compiler

Compiled 11 to 10 computations (9.1% saved)

sample1.8s (33.3%)

Memory
30.2MiB live, 2 364.7MiB allocated; 581ms collecting garbage
Samples
1.2s6 051×1valid
169.0ms2 205×0valid
Precisions
Click to see histograms. Total time spent on operations: 975.0ms
ival-cos: 377.0ms (38.6% of total)
ival-sin: 236.0ms (24.2% of total)
adjust: 161.0ms (16.5% of total)
ival-mult!: 81.0ms (8.3% of total)
ival-div!: 69.0ms (7.1% of total)
ival-add!: 51.0ms (5.2% of total)
Bogosity

preprocess26.0ms (0.5%)

Memory
34.9MiB live, 34.9MiB allocated; 0ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
03895
117893
279893
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
77.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Symmetry

(negabs r)

Compiler

Compiled 18 to 16 computations (11.1% saved)

series47.0ms (0.9%)

Memory
-25.3MiB live, 75.3MiB allocated; 26ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0220888
Stop Event
iter-limit
Counts
8 → 39
Calls
Call 1
Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
a
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Outputs
#s(approx r r)
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx a a)
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (+ a b) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
Calls

9 calls:

TimeVariablePoint
10.0ms
r
-inf
2.0ms
b
-inf
2.0ms
r
inf
2.0ms
r
0
2.0ms
a
0

rewrite154.0ms (2.9%)

Memory
25.3MiB live, 259.0MiB allocated; 38ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0825
01325
15825
225725
3157425
0447825
Stop Event
iter-limit
node-limit
iter-limit
Counts
8 → 104
Calls
Call 1
Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
a
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Outputs
r
b
(sin.f64 b)
(*.f64 (neg.f64 (neg.f64 r)) (sin.f64 b))
(*.f64 (neg.f64 (neg.f64 (sin.f64 b))) r)
(*.f64 (neg.f64 r) (neg.f64 (sin.f64 b)))
(*.f64 (neg.f64 (sin.f64 b)) (neg.f64 r))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 b) r))
(*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64))
(*.f64 (sin.f64 b) (*.f64 r #s(literal 1 binary64)))
(*.f64 (sin.f64 b) (neg.f64 (neg.f64 r)))
(*.f64 (sin.f64 b) r)
(*.f64 r (*.f64 (sin.f64 b) #s(literal 1 binary64)))
(*.f64 r (neg.f64 (neg.f64 (sin.f64 b))))
(*.f64 r (sin.f64 b))
(neg.f64 (*.f64 (neg.f64 r) (sin.f64 b)))
a
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 a) b)) b)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 b) a)) a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (neg.f64 a) (neg.f64 a))) (+.f64 b (neg.f64 a)))
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 (neg.f64 a) (neg.f64 a)) (*.f64 b (neg.f64 a)))))
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a))
(/.f64 (-.f64 (*.f64 a a) (*.f64 (neg.f64 b) (neg.f64 b))) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b a))))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (*.f64 a a) (+.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (*.f64 a (neg.f64 b)))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 b b) (*.f64 a b))))
(neg.f64 (neg.f64 (+.f64 a b)))
(-.f64 a (neg.f64 b))
(-.f64 b (neg.f64 a))
(+.f64 (neg.f64 (neg.f64 a)) b)
(+.f64 a b)
(+.f64 b (neg.f64 (neg.f64 a)))
(+.f64 b a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)))) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))) (-.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (neg.f64 (-.f64 (+.f64 a b) (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 a b))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (+.f64 a b)) (PI.f64)))
(sin.f64 (+.f64 (-.f64 (+.f64 a b) (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64))) (PI.f64)))
(sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (-.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(-.f64 (*.f64 (sin.f64 a) (cos.f64 (-.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 a) (sin.f64 (-.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 a b))) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(-.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 a))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 a b)))))
(cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (+.f64 a b)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (-.f64 (+.f64 a b) (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (-.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (-.f64 (neg.f64 b) (-.f64 a (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 a b)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (PI.f64) (+.f64 a b)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(+.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (neg.f64 r) (/.f64 (sin.f64 b) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b)))
(*.f64 (neg.f64 (sin.f64 b)) (*.f64 r (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (neg.f64 (sin.f64 b)) (/.f64 r (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) #s(literal 1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (*.f64 (neg.f64 r) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))

eval16.0ms (0.3%)

Memory
-13.1MiB live, 32.2MiB allocated; 5ms collecting garbage
Compiler

Compiled 2 723 to 615 computations (77.4% saved)

prune23.0ms (0.4%)

Memory
-3.8MiB live, 42.1MiB allocated; 5ms collecting garbage
Pruning

26 alts after pruning (25 fresh and 1 done)

PrunedKeptTotal
New11125136
Fresh000
Picked101
Done-110
Total11126137
Accuracy
99.8%
Counts
137 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
77.5%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))) (-.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
77.5%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))))
55.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (sin.f64 a) (cos.f64 (-.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 a) (sin.f64 (-.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
38.7%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
38.0%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
77.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
66.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
60.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
57.5%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b))))))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
52.2%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
52.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
55.4%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
51.3%
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
76.9%
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
77.5%
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
77.5%
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
77.5%
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
77.4%
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
77.4%
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
58.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
Compiler

Compiled 1 105 to 690 computations (37.6% saved)

series117.0ms (2.2%)

Memory
-2.5MiB live, 182.4MiB allocated; 40ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06803251
Stop Event
iter-limit
Counts
35 → 123
Calls
Call 1
Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
(cos.f64 b)
a
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 b r)
(/.f64 (*.f64 b r) (cos.f64 a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(literal 1 binary64)
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 a b)
(+.f64 #s(literal 1 binary64) (/.f64 a b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)
(cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
#s(literal 2 binary64)
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))
(+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
Outputs
#s(approx r r)
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (* b r) (*.f64 b r))
#s(approx (/ (* b r) (cos a)) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (* r (sin b)) (cos (* (+ 1 (/ a b)) b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))))
#s(approx (* r (pow (sin b) 2)) (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
#s(approx (* a (* r (pow (sin b) 2))) (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (* r (sin b)) (cos b)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 r (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 #s(literal -1 binary64) (*.f64 r (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx a a)
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b))) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* b r) (cos a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (*.f64 b r)))
#s(approx (/ (* b r) (cos a)) (+.f64 (*.f64 b r) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ (* b r) (cos a)) (+.f64 (*.f64 b r) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 b r)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 b r)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 b)) (/.f64 (*.f64 a (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (cos.f64 b))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (/ a b) (/.f64 a b))
#s(approx (+ 1 (/ a b)) (+.f64 #s(literal 1 binary64) (/.f64 a b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
#s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))))
#s(approx (cos (* (+ 1 (/ a b)) b)) (cos.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 a (+.f64 (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ a b) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (cos (* (+ 1 (/ a b)) b)) (cos.f64 (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (* (+ 1 (/ a b)) b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b)))))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (+ 1 (/ a b)) (/.f64 (+.f64 a b) b))
#s(approx (pow (sin b) 2) (pow.f64 b #s(literal 2 binary64)))
#s(approx (pow (sin b) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (pow (sin b) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin b) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (* r (pow (sin b) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) r))
#s(approx (* r (pow (sin b) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 r (*.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (pow (sin b) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (pow (sin b) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 2/45 binary64) r))))))))
#s(approx (* a (* r (pow (sin b) 2))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))
#s(approx (* a (* r (pow (sin b) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r))) (*.f64 a r))))
#s(approx (* a (* r (pow (sin b) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 a r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal 2/45 binary64) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r))))))))
#s(approx (* a (* r (pow (sin b) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 a r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r))) (*.f64 #s(literal 2/45 binary64) (*.f64 a r)))))))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 a r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (*.f64 a r)))))))
#s(approx (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 a r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 a r)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (*.f64 a r)))) (*.f64 #s(literal 1/3 binary64) (*.f64 a r)))))) (*.f64 #s(literal -1 binary64) (*.f64 a r)))))))
#s(approx (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 a r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 a r)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 a r)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 a r)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (*.f64 a r)))) (*.f64 #s(literal 1/3 binary64) (*.f64 a r))))) (+.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 a r)) (*.f64 #s(literal 1/3 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (*.f64 a r))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (*.f64 a r)))) (*.f64 #s(literal 1/3 binary64) (*.f64 a r)))))) (*.f64 #s(literal -1 binary64) (*.f64 a r)))))))
#s(approx (/ (* r (sin b)) (cos b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* r (sin b)) (cos b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))) (*.f64 #s(literal 1/24 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* r (sin b)) (cos b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) r) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))) (*.f64 #s(literal 1/24 binary64) r)))) (+.f64 (*.f64 #s(literal -1/720 binary64) r) (*.f64 #s(literal 1/24 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))) (*.f64 #s(literal 1/24 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (*.f64 a r))))) (*.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (pow (sin b) 2) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ a b) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
Calls

9 calls:

TimeVariablePoint
17.0ms
r
inf
13.0ms
b
0
11.0ms
a
-inf
9.0ms
r
-inf
7.0ms
r
0

rewrite217.0ms (4.1%)

Memory
-15.4MiB live, 360.2MiB allocated; 145ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
040237
068209
1289200
21514200
04407200
Stop Event
iter-limit
node-limit
iter-limit
Counts
35 → 610
Calls
Call 1
Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
(cos.f64 b)
a
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 b r)
(/.f64 (*.f64 b r) (cos.f64 a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(literal 1 binary64)
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 a b)
(+.f64 #s(literal 1 binary64) (/.f64 a b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)
(cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
#s(literal 2 binary64)
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))
(+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
Outputs
r
b
(sin.f64 b)
(*.f64 (*.f64 #s(literal 1 binary64) r) (sin.f64 b))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 b)) r)
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 b) r))
(*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 b)))
(cos.f64 (fabs.f64 (fabs.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 (fabs.f64 b))
(cos.f64 b)
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
a
(sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 (fabs.f64 a)))
(cos.f64 (fabs.f64 (fabs.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 (fabs.f64 a))
(cos.f64 a)
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) b)) (cos.f64 (-.f64 (fabs.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 b))) (cos.f64 (-.f64 a (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) a)) (cos.f64 (-.f64 (fabs.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 a))) (cos.f64 (-.f64 b (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b)) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) a)) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
(+.f64 (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)))
(sin.f64 a)
(*.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
(-.f64 (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 b r)
(*.f64 r b)
(*.f64 (/.f64 r (cos.f64 a)) b)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r))
(*.f64 (*.f64 (neg.f64 b) r) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 a))))
(*.f64 (*.f64 b r) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(*.f64 b (/.f64 r (cos.f64 a)))
(*.f64 r (*.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 r (/.f64 b (cos.f64 a)))
(/.f64 (*.f64 (*.f64 b r) #s(literal 1 binary64)) (cos.f64 a))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) r)) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (*.f64 (neg.f64 b) r) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 a)) (*.f64 (neg.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
(/.f64 (*.f64 b r) (cos.f64 a))
(neg.f64 (/.f64 (*.f64 b r) (neg.f64 (cos.f64 a))))
(neg.f64 (/.f64 (*.f64 (neg.f64 b) r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(literal 1 binary64)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 b) a)) a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a)
(*.f64 (/.f64 (+.f64 a b) b) b)
(*.f64 b (/.f64 (+.f64 a b) b))
(/.f64 (*.f64 b (+.f64 a b)) b)
(/.f64 (*.f64 (+.f64 a b) b) b)
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a))
(/.f64 (-.f64 (*.f64 a a) (*.f64 (neg.f64 b) (neg.f64 b))) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b a))))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (*.f64 a a) (+.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (*.f64 a (neg.f64 b)))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 b b) (*.f64 a b))))
(neg.f64 (neg.f64 (+.f64 a b)))
(-.f64 a (neg.f64 b))
(-.f64 b (neg.f64 a))
(+.f64 (*.f64 b (/.f64 a b)) b)
(+.f64 (*.f64 (/.f64 a b) b) b)
(+.f64 a (neg.f64 (neg.f64 b)))
(+.f64 a b)
(+.f64 b (*.f64 b (/.f64 a b)))
(+.f64 b (*.f64 (/.f64 a b) b))
(+.f64 b a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (pow.f64 (cos.f64 (+.f64 a b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (+.f64 a b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(pow.f64 (cos.f64 (+.f64 a b)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) r) (sin.f64 b))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 b)) r)
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 b) r))
(*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) b) a)
(*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (neg.f64 b)))
(*.f64 a (/.f64 #s(literal 1 binary64) b))
(/.f64 (*.f64 a #s(literal 1 binary64)) b)
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b)))
(/.f64 (neg.f64 a) (neg.f64 b))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 b) (neg.f64 a)))
(/.f64 #s(literal 1 binary64) (/.f64 b a))
(/.f64 a b)
(neg.f64 (/.f64 (neg.f64 a) b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 a b) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 a b) (/.f64 #s(literal 1 binary64) b))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 b)) (neg.f64 a)) (neg.f64 b))
(/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 (neg.f64 a) b) (/.f64 (neg.f64 a) b))) (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 a) b)))
(/.f64 (+.f64 (pow.f64 (/.f64 a b) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 a b) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 a) b) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (*.f64 (/.f64 (neg.f64 a) b) (/.f64 (neg.f64 a) b)) (*.f64 #s(literal 1 binary64) (/.f64 (neg.f64 a) b)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 a b) (/.f64 a b))) (-.f64 #s(literal 1 binary64) (/.f64 a b)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 a b) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) (/.f64 a b)))))
(/.f64 (neg.f64 (+.f64 a b)) (neg.f64 b))
(/.f64 (+.f64 a b) b)
(/.f64 #s(literal 1 binary64) (/.f64 b (+.f64 a b)))
(neg.f64 (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)))
(-.f64 (/.f64 a b) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 a) b))
(+.f64 (/.f64 b b) (/.f64 a b))
(+.f64 (/.f64 a b) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 a b))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 b) a)) a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a)
(*.f64 (/.f64 (+.f64 a b) b) b)
(*.f64 b (/.f64 (+.f64 a b) b))
(/.f64 (*.f64 b (+.f64 a b)) b)
(/.f64 (*.f64 (+.f64 a b) b) b)
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a))
(/.f64 (-.f64 (*.f64 a a) (*.f64 (neg.f64 b) (neg.f64 b))) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b a))))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (*.f64 a a) (+.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (*.f64 a (neg.f64 b)))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 b b) (*.f64 a b))))
(neg.f64 (neg.f64 (+.f64 a b)))
(-.f64 a (neg.f64 b))
(-.f64 b (neg.f64 a))
(+.f64 (*.f64 b (/.f64 a b)) b)
(+.f64 (*.f64 (/.f64 a b) b) b)
(+.f64 a (neg.f64 (neg.f64 b)))
(+.f64 a b)
(+.f64 b (*.f64 b (/.f64 a b)))
(+.f64 b (*.f64 (/.f64 a b) b))
(+.f64 b a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
#s(literal 2 binary64)
(*.f64 (fabs.f64 (sin.f64 b)) (fabs.f64 (sin.f64 b)))
(*.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 b)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (sin.f64 b))
(*.f64 (pow.f64 (sin.f64 b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 b) (sin.f64 b))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b b)) (cos.f64 (+.f64 b b))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r)
(*.f64 (*.f64 (sin.f64 b) r) (sin.f64 b))
(*.f64 (sin.f64 b) (*.f64 (sin.f64 b) r))
(*.f64 r (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))
(*.f64 (*.f64 (*.f64 a r) (sin.f64 b)) (sin.f64 b))
(*.f64 (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) r)
(*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) a)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 a r))
(*.f64 a (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r))
(*.f64 r (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) a))
(*.f64 (fabs.f64 (cos.f64 b)) (fabs.f64 (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 b) #s(literal 1 binary64)) (pow.f64 (cos.f64 b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 b) #s(literal 1 binary64)) (cos.f64 b))
(*.f64 (pow.f64 (cos.f64 b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (cos.f64 b)) (neg.f64 (cos.f64 b)))
(*.f64 (cos.f64 b) (cos.f64 b))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 b (PI.f64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 (neg.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 (neg.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 b (PI.f64)))) (cos.f64 (-.f64 (+.f64 (neg.f64 b) (PI.f64)) (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 (neg.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 (neg.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 b (PI.f64)))) (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (PI.f64)) (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 b (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 (neg.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 b (PI.f64)) (+.f64 (neg.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64)))) (cos.f64 (-.f64 (+.f64 b (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 b (PI.f64)))) (cos.f64 (-.f64 (+.f64 b (PI.f64)) (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) b)) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) b)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) b)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 b (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 b (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 b (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (neg.f64 b) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (neg.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (fabs.f64 b) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 (fabs.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 b (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (neg.f64 b) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (neg.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 (fabs.f64 b) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 b (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)) (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) b)) (cos.f64 (-.f64 (neg.f64 b) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) b)) (cos.f64 (-.f64 (fabs.f64 b) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 b))) (cos.f64 (-.f64 b (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 b))) (cos.f64 (-.f64 b (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b b)) (cos.f64 (-.f64 b b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) b)) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) b))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 b)) (sin.f64 (neg.f64 b))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 b)) (sin.f64 (fabs.f64 b))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 b)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 b)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))
(*.f64 (/.f64 (*.f64 a r) (cos.f64 b)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (cos.f64 b)))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (cos.f64 b)) (/.f64 a (cos.f64 b)))
(*.f64 (/.f64 a (cos.f64 b)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (cos.f64 b)))
(*.f64 (*.f64 a r) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(*.f64 (*.f64 a r) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) a)
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(*.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (*.f64 a (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (/.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(*.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(/.f64 (*.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))
(/.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (cos.f64 b))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(/.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(neg.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(*.f64 (tan.f64 b) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 b)) (*.f64 (sin.f64 b) r))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 b))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 b))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 b)) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b))
(neg.f64 (*.f64 (neg.f64 r) (tan.f64 b)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r))) (*.f64 (tan.f64 b) r))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 r) (tan.f64 b)) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (tan.f64 b) r) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(*.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (*.f64 (sin.f64 b) r)) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (sin.f64 b) r)) (*.f64 (*.f64 a r) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (cos.f64 b)))) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (sin.f64 b) r)) (*.f64 (*.f64 a r) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (cos.f64 b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b))
(/.f64 (+.f64 (*.f64 (*.f64 (tan.f64 b) r) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(/.f64 (+.f64 (*.f64 (*.f64 (tan.f64 b) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b))) (*.f64 (neg.f64 r) (sin.f64 b))) (neg.f64 (cos.f64 b)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b)))) (*.f64 (neg.f64 (cos.f64 b)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b)))) (*.f64 (neg.f64 (cos.f64 b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 b) r) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b))) (*.f64 (cos.f64 b) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b))) (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (*.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (*.f64 (*.f64 (sin.f64 b) r) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (*.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b))) (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (neg.f64 (cos.f64 b))))
(/.f64 (-.f64 (*.f64 (*.f64 (tan.f64 b) r) (*.f64 (tan.f64 b) r)) (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (-.f64 (*.f64 (tan.f64 b) r) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (*.f64 (neg.f64 r) (tan.f64 b)) (*.f64 (neg.f64 r) (tan.f64 b)))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (neg.f64 r) (tan.f64 b))))
(/.f64 (+.f64 (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (tan.f64 b) r) (*.f64 (tan.f64 b) r)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (*.f64 (tan.f64 b) r) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 r) (tan.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (+.f64 (*.f64 (*.f64 (neg.f64 r) (tan.f64 b)) (*.f64 (neg.f64 r) (tan.f64 b))) (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (neg.f64 r) (tan.f64 b))))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (neg.f64 (cos.f64 b)) (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (*.f64 (neg.f64 (cos.f64 b)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (neg.f64 (cos.f64 b)) (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (*.f64 (neg.f64 (cos.f64 b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 b) r) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (cos.f64 b) (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) (*.f64 (cos.f64 b) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b))) (*.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (neg.f64 r) (sin.f64 b)))) (*.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (*.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) r))) (*.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (neg.f64 (cos.f64 b))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (neg.f64 r) (sin.f64 b)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (neg.f64 (cos.f64 b))))
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (*.f64 (sin.f64 b) r))) (neg.f64 (cos.f64 b)))
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (sin.f64 b) r)) (*.f64 (*.f64 a r) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (cos.f64 b))))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (*.f64 (sin.f64 b) r)) (cos.f64 b))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (sin.f64 b) r)) (*.f64 (*.f64 a r) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (cos.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (*.f64 (*.f64 (tan.f64 b) r) (*.f64 (tan.f64 b) r))) (-.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))) (-.f64 (*.f64 (*.f64 (tan.f64 b) r) (*.f64 (tan.f64 b) r)) (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (*.f64 (sin.f64 b) r))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (sin.f64 b) r)) (*.f64 (*.f64 a r) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (cos.f64 b))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 r) (tan.f64 b)) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(-.f64 (*.f64 (tan.f64 b) r) (*.f64 (*.f64 (neg.f64 (*.f64 a r)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(-.f64 (*.f64 (tan.f64 b) r) (*.f64 (neg.f64 a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(-.f64 (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
(-.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (neg.f64 r) (tan.f64 b)))
(+.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (cos.f64 b)) (cos.f64 b)) (*.f64 (tan.f64 b) r))
(+.f64 (/.f64 (*.f64 (*.f64 a r) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (cos.f64 b))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (*.f64 (sin.f64 b) r)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(+.f64 (*.f64 (tan.f64 b) r) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))
(+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (*.f64 (tan.f64 b) r) (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))

eval114.0ms (2.2%)

Memory
16.5MiB live, 199.9MiB allocated; 52ms collecting garbage
Compiler

Compiled 22 672 to 4 048 computations (82.1% saved)

prune50.0ms (0.9%)

Memory
-13.3MiB live, 88.6MiB allocated; 15ms collecting garbage
Pruning

43 alts after pruning (40 fresh and 3 done)

PrunedKeptTotal
New63330663
Fresh101020
Picked505
Done-231
Total64643689
Accuracy
99.8%
Counts
689 → 43
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
60.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
65.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
61.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
77.3%
(/.f64 (*.f64 r (sin.f64 b)) (+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
38.7%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
38.0%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
54.7%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
66.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
64.1%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
50.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
61.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
60.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
52.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
55.4%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
51.3%
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
76.9%
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
77.5%
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
77.5%
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
60.2%
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
77.4%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
77.4%
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
50.5%
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
55.4%
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
52.1%
(*.f64 #s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) r))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (+.f64 (*.f64 (sin.f64 a) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
34.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
34.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
34.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
50.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
57.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
31.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 a (+.f64 (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
Compiler

Compiled 1 821 to 1 263 computations (30.6% saved)

series129.0ms (2.4%)

Memory
18.2MiB live, 153.5MiB allocated; 22ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07734555
Stop Event
iter-limit
Counts
33 → 128
Calls
Call 1
Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
#s(literal 1 binary64)
a
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(cos.f64 b)
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 b r)
#s(approx (cos a) #s(literal 1 binary64))
(/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (cos.f64 a) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(neg.f64 b)
#s(literal 1/2 binary64)
(PI.f64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
Outputs
#s(approx r r)
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (/.f64 (*.f64 r (sin.f64 b)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))))
#s(approx (* b r) (*.f64 b r))
#s(approx (/ (* b r) (cos a)) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (cos a) (* b r)) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx a a)
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b))) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (/.f64 (*.f64 a (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (*.f64 a (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (*.f64 a (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (*.f64 a (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal 1/24 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (sin.f64 b)) (cos.f64 b)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 b) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 b)) (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b)))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 b) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 b)) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 b)) (*.f64 (cos.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))))))))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 b)) (*.f64 (cos.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* b r) (cos a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (*.f64 b r)))
#s(approx (/ (* b r) (cos a)) (+.f64 (*.f64 b r) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ (* b r) (cos a)) (+.f64 (*.f64 b r) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 b r)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 b r)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (cos a) (* b r)) (/.f64 #s(literal 1 binary64) (*.f64 b r)))
#s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 b r))))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (*.f64 b r))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 b r))))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (- a (* 1/2 (PI))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
#s(approx (- a (* 1/2 (PI))) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
#s(approx (- a (* 1/2 (PI))) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)))))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) (+.f64 #s(literal 1 binary64) (/.f64 b a)))))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (- a (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64)))))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))))
#s(approx b b)
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (/.f64 (*.f64 b (sin.f64 a)) (cos.f64 a)))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (*.f64 b (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (*.f64 b (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (*.f64 b (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))))) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal 1/24 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (cos.f64 a)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (*.f64 b (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (*.f64 b (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 a) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 a) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 a)) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 b (*.f64 (cos.f64 a) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))))))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (*.f64 r (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (cos.f64 a)))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal -1 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (*.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (*.f64 b (+.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (*.f64 b (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))))
#s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))))
Calls

9 calls:

TimeVariablePoint
28.0ms
r
inf
27.0ms
b
inf
7.0ms
r
-inf
6.0ms
r
0
6.0ms
b
-inf

rewrite198.0ms (3.7%)

Memory
-23.2MiB live, 455.0MiB allocated; 85ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
041242
065198
1310195
21670186
04103186
Stop Event
iter-limit
node-limit
iter-limit
Counts
33 → 489
Calls
Call 1
Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
#s(literal 1 binary64)
a
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(cos.f64 b)
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 b r)
#s(approx (cos a) #s(literal 1 binary64))
(/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (cos.f64 a) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(neg.f64 b)
#s(literal 1/2 binary64)
(PI.f64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
Outputs
r
b
(sin.f64 b)
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
#s(literal 1 binary64)
a
(sin.f64 a)
(*.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
(-.f64 (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)))
(sin.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))
(cos.f64 (neg.f64 (fabs.f64 b)))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (fabs.f64 (fabs.f64 b)))
(cos.f64 (fabs.f64 b))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 (fabs.f64 a)))
(cos.f64 (fabs.f64 (fabs.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 (fabs.f64 a))
(cos.f64 a)
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 b)) (cos.f64 a))
(*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 a)) (cos.f64 b))
(*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 1 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) b)) (cos.f64 (-.f64 (fabs.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 b))) (cos.f64 (-.f64 a (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) a)) (cos.f64 (-.f64 (fabs.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 a))) (cos.f64 (-.f64 b (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b)) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) a)) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(+.f64 (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(*.f64 (tan.f64 a) (tan.f64 b))
(*.f64 (tan.f64 b) (tan.f64 a))
(*.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 a)) (/.f64 (sin.f64 a) (cos.f64 b)))
(*.f64 (/.f64 (sin.f64 a) (cos.f64 b)) (/.f64 (sin.f64 b) (cos.f64 a)))
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (sin.f64 a))
(*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a))))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (sin.f64 a) (/.f64 (tan.f64 b) (cos.f64 a)))
(*.f64 (sin.f64 b) (*.f64 (sin.f64 a) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))))
(*.f64 (sin.f64 b) (/.f64 (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 (/.f64 (sin.f64 a) (cos.f64 b)) (sin.f64 b)) (cos.f64 a))
(/.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 1 binary64)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 a) (/.f64 (sin.f64 b) (cos.f64 a))) (cos.f64 b))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 a)) (cos.f64 b))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 a) (tan.f64 b))) (neg.f64 (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (neg.f64 (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a))))
(/.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (cos.f64 a))
(/.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 (sin.f64 a) (tan.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(neg.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))))
(*.f64 (/.f64 (cos.f64 (+.f64 a b)) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (cos.f64 (+.f64 a b)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (/.f64 (cos.f64 (+.f64 a b)) (cos.f64 a)) (cos.f64 b))
(/.f64 (/.f64 (cos.f64 (+.f64 a b)) (cos.f64 b)) (cos.f64 a))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 (sin.f64 a) (tan.f64 b))) (cos.f64 a))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))))) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b)))) (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (tan.f64 a) (tan.f64 b)) (*.f64 (tan.f64 a) (tan.f64 b)))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 (tan.f64 a) (tan.f64 b)) (*.f64 (tan.f64 a) (tan.f64 b))) (*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))))
(/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (cos.f64 (+.f64 a b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (tan.f64 a) (tan.f64 b)))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))
(+.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (cos.f64 b))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)) (cos.f64 a))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(*.f64 (cos.f64 a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)))
(*.f64 (cos.f64 b) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (+.f64 a b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (cos.f64 (+.f64 a b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b)))) (*.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b)))) (+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (+.f64 a b)) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 a (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))
(sin.f64 (-.f64 (-.f64 (neg.f64 b) a) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 (neg.f64 b) a)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (neg.f64 (cos.f64 b)) (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(*.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(*.f64 (/.f64 (sin.f64 b) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
(*.f64 (/.f64 r (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 a)))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 r (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (/.f64 r (*.f64 (cos.f64 a) (cos.f64 b))) (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(*.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 (tan.f64 b) (cos.f64 a)))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)) (cos.f64 b))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 b)) (cos.f64 a))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (cos.f64 a))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (cos.f64 b))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(*.f64 b r)
(*.f64 r b)
#s(approx (cos a) #s(literal 1 binary64))
(*.f64 (/.f64 r #s(approx (cos a) #s(literal 1 binary64))) b)
(*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) (*.f64 b r))
(*.f64 (*.f64 (neg.f64 b) r) (/.f64 #s(literal 1 binary64) (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(*.f64 (*.f64 b r) (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(literal 1 binary64))))
(*.f64 r (*.f64 b (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64)))))
(*.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 b r) #s(literal 1 binary64)) #s(approx (cos a) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) r)) (neg.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 b) r) (neg.f64 #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (neg.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r)))
(neg.f64 (/.f64 (*.f64 b r) (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 b) r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r #s(approx (cos a) #s(literal 1 binary64))) b))
(*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))
(*.f64 (neg.f64 (cos.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 b) r)))
(*.f64 (cos.f64 a) (/.f64 #s(literal 1 binary64) (*.f64 b r)))
(/.f64 (*.f64 (cos.f64 a) #s(literal 1 binary64)) (*.f64 b r))
(/.f64 (/.f64 (cos.f64 a) r) b)
(/.f64 (neg.f64 (/.f64 (cos.f64 a) b)) (neg.f64 r))
(/.f64 (neg.f64 (neg.f64 (cos.f64 a))) (neg.f64 (*.f64 (neg.f64 b) r)))
(/.f64 (/.f64 (cos.f64 a) b) r)
(/.f64 (neg.f64 (cos.f64 a)) (*.f64 (neg.f64 b) r))
(/.f64 (cos.f64 a) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (*.f64 b (/.f64 r (cos.f64 a))))
(neg.f64 (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r)
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b)
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r)
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 a))) (*.f64 (neg.f64 b) r))
(*.f64 (pow.f64 (/.f64 (cos.f64 a) (*.f64 b r)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 a) (*.f64 b r)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r))))
(*.f64 (*.f64 b (/.f64 r (cos.f64 a))) #s(literal 1 binary64))
(*.f64 (*.f64 b r) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(*.f64 #s(literal 1 binary64) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 b (/.f64 r (cos.f64 a)))
(*.f64 r (/.f64 b (cos.f64 a)))
(pow.f64 (/.f64 (cos.f64 a) (*.f64 b r)) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 b r)))
(/.f64 (*.f64 (neg.f64 b) r) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r)))
(/.f64 (*.f64 b r) (cos.f64 a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (cos.f64 a) (*.f64 b r)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) (*.f64 b r)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
(/.f64 r (/.f64 (cos.f64 a) b))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r))))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(neg.f64 b)
#s(literal 1/2 binary64)
(PI.f64)
(*.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) a)) a)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) a)
(/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 a a) (+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(-.f64 a (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) a)
(+.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (-.f64 (neg.f64 b) a))) (-.f64 (neg.f64 b) a))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b))) (neg.f64 b))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (neg.f64 b))
(/.f64 (-.f64 (*.f64 (-.f64 (neg.f64 b) a) (-.f64 (neg.f64 b) a)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (-.f64 (neg.f64 b) a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (-.f64 (neg.f64 b) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))
(/.f64 (+.f64 (pow.f64 (-.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (neg.f64 b) a) (-.f64 (neg.f64 b) a)) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (-.f64 (neg.f64 b) a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (-.f64 (*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (*.f64 (neg.f64 b) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
(/.f64 (-.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (*.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (+.f64 (neg.f64 b) (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (+.f64 (*.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 b) (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(neg.f64 (+.f64 b (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(neg.f64 (+.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))) b))
(-.f64 (-.f64 (neg.f64 b) a) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (neg.f64 b) (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (-.f64 (neg.f64 b) a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (-.f64 (neg.f64 b) a))
(+.f64 (neg.f64 b) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (cos.f64 b))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)) (cos.f64 a))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(*.f64 (cos.f64 a) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)))
(*.f64 (cos.f64 b) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (+.f64 a b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (cos.f64 (+.f64 a b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b)))) (*.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b)))) (+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (+.f64 a b)) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 a (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))
(sin.f64 (-.f64 (-.f64 (neg.f64 b) a) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 (neg.f64 b) a)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (neg.f64 (cos.f64 b)) (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(*.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(*.f64 (/.f64 (sin.f64 b) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
(*.f64 (/.f64 r (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 a)))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 r (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (/.f64 r (*.f64 (cos.f64 a) (cos.f64 b))) (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(*.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 (tan.f64 b) (cos.f64 a)))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)) (cos.f64 b))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 b)) (cos.f64 a))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (cos.f64 a))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (cos.f64 b))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(approx (* (cos b) (cos a)) (cos.f64 b)))) #s(approx (* (cos b) (cos a)) (cos.f64 b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b)))) #s(approx (* (cos b) (cos a)) (cos.f64 b)))
(/.f64 (-.f64 (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))))
(/.f64 (-.f64 (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(neg.f64 (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (neg.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(+.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(approx (* (cos b) (cos a)) (cos.f64 b)))
(+.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b)))) (*.f64 (sin.f64 b) r))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b)))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b)))))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))))))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b)))))

eval125.0ms (2.4%)

Memory
20.7MiB live, 245.4MiB allocated; 38ms collecting garbage
Compiler

Compiled 21 314 to 3 540 computations (83.4% saved)

prune65.0ms (1.2%)

Memory
-14.4MiB live, 138.3MiB allocated; 24ms collecting garbage
Pruning

68 alts after pruning (62 fresh and 6 done)

PrunedKeptTotal
New56134595
Fresh72835
Picked505
Done-363
Total57068638
Accuracy
100.0%
Counts
638 → 68
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.5%
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)) (cos.f64 b))
99.5%
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
99.5%
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (cos.f64 a))
99.5%
(/.f64 (*.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
60.6%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b)))) (+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
60.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
65.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
38.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (*.f64 (sin.f64 a) (sin.f64 b))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 a) (sin.f64 b))))
61.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
77.3%
(/.f64 (*.f64 r (sin.f64 b)) (+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sin.f64 a) (cos.f64 b)) (sin.f64 b)) (cos.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (cos.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)) (cos.f64 a)))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (cos.f64 b)))
38.7%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
33.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
36.5%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
19.2%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
54.7%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
66.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
64.1%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
50.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
61.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
60.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
52.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
38.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
55.4%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
51.3%
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
99.5%
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
61.5%
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
99.4%
(*.f64 (/.f64 (sin.f64 b) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
77.5%
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
77.5%
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
60.2%
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
77.4%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
61.5%
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
77.4%
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
50.5%
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
55.4%
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
34.3%
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
34.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
34.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
50.5%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
33.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
50.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
32.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
33.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
50.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
50.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
20.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
57.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
25.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
31.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 a (+.f64 (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
Compiler

Compiled 2 870 to 2 047 computations (28.7% saved)

series168.0ms (3.2%)

Memory
16.7MiB live, 346.4MiB allocated; 32ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09915323
Stop Event
iter-limit
Counts
43 → 171
Calls
Call 1
Inputs
b
(sin.f64 b)
r
(*.f64 (sin.f64 b) r)
#s(literal 1 binary64)
a
(tan.f64 a)
(tan.f64 b)
(*.f64 (tan.f64 a) (tan.f64 b))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(cos.f64 a)
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a))
(cos.f64 b)
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)) (cos.f64 b))
(*.f64 b r)
(*.f64 a (*.f64 b r))
(+.f64 r (*.f64 a (*.f64 b r)))
(*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(literal -1/2 binary64)
#s(literal 2 binary64)
(pow.f64 a #s(literal 2 binary64))
(*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
(/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
(*.f64 r (sin.f64 b))
(+.f64 a b)
(PI.f64)
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (cos.f64 b) (cos.f64 a))
(sin.f64 a)
(*.f64 b (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
Outputs
#s(approx r r)
#s(approx (* (sin b) r) (*.f64 r (sin.f64 b)))
#s(approx (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
#s(approx (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (/.f64 (*.f64 r (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
#s(approx (/ (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (cos b)) (/.f64 (*.f64 r (sin.f64 b)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))))
#s(approx (* b r) (*.f64 b r))
#s(approx (* a (* b r)) (*.f64 a (*.f64 b r)))
#s(approx (+ r (* a (* b r))) (*.f64 r (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (* b (+ r (* a (* b r)))) (*.f64 b (*.f64 r (+.f64 #s(literal 1 binary64) (*.f64 a b)))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 r (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (cos a) (* b r)) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ 1 (/ (cos a) (* b r))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* b (+ r (* a (* b r)))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a b)) #s(literal 1 binary64))))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 #s(literal -1 binary64) (*.f64 r (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx a a)
#s(approx (tan a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (tan a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (tan a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (* (tan a) (tan b)) (/.f64 (*.f64 a (sin.f64 b)) (cos.f64 b)))
#s(approx (* (tan a) (tan b)) (*.f64 a (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (* (tan a) (tan b)) (*.f64 a (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (* (tan a) (tan b)) (*.f64 a (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (*.f64 #s(literal 2/15 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (sin.f64 b)) (cos.f64 b)))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (*.f64 a (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (+.f64 (*.f64 r (sin.f64 b)) (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (+.f64 (*.f64 a (-.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b))))) (*.f64 r (sin.f64 b))))
#s(approx (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b))))) (*.f64 r (sin.f64 b))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 r (sin.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b))))) (*.f64 r (sin.f64 b))))
#s(approx (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b))) (+.f64 (*.f64 r (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (/.f64 (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 r (sin.f64 b))))) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 r (sin.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b))))) (*.f64 r (sin.f64 b))))
#s(approx (/ (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (cos b)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (cos b)) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (cos b)) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (cos b)) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1/3 binary64) (sin.f64 b)) (*.f64 #s(literal 1/2 binary64) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ r (* a (* b r))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (* b (+ r (* a (* b r)))) (+.f64 (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 b) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (pow a 2) (pow.f64 a #s(literal 2 binary64)))
#s(approx (* -1/2 (pow a 2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (cos a) (* b r)) (/.f64 #s(literal 1 binary64) (*.f64 b r)))
#s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 b r))))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (*.f64 b r))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 b r))))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ 1 (/ (cos a) (* b r))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (*.f64 b r)))
#s(approx (/ 1 (/ (cos a) (* b r))) (+.f64 (*.f64 b r) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ 1 (/ (cos a) (* b r))) (+.f64 (*.f64 b r) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 b r)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 b r)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b r)) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 (+.f64 a b) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (+.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 a (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (+.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (+.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 b)))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b))) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* b (sin a)) (*.f64 a b))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))))))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)) (*.f64 #s(literal 1/120 binary64) b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (tan a) (/.f64 (sin.f64 a) (cos.f64 a)))
#s(approx (* (tan a) (tan b)) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
#s(approx (- 1 (* (tan a) (tan b))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))
#s(approx (cos a) (cos.f64 a))
#s(approx (+ r (* a (* b r))) (*.f64 a (+.f64 (*.f64 b r) (/.f64 r a))))
#s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))
#s(approx (* b (+ r (* a (* b r)))) (*.f64 a (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (/.f64 (*.f64 b r) a))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 a (+.f64 (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (+ 1 (* -1/2 (pow a 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (- (+ a b) (* (PI) -1/2)) (*.f64 a (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (sin.f64 (-.f64 (+.f64 a b) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* b (sin a)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b r)) (*.f64 #s(literal -1 binary64) (/.f64 r a))))))
#s(approx (* b (+ r (* a (* b r)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) a))))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ a b) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (- (+ a b) (* (PI) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (sin.f64 (-.f64 b (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 b (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (* (tan a) (tan b)) (/.f64 (*.f64 b (sin.f64 a)) (cos.f64 a)))
#s(approx (* (tan a) (tan b)) (*.f64 b (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (* (tan a) (tan b)) (*.f64 b (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (* (tan a) (tan b)) (*.f64 b (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (*.f64 #s(literal 2/15 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (cos.f64 a)))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (*.f64 b (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (*.f64 b (+.f64 r (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (*.f64 b (+.f64 r (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (cos.f64 a))))))))
#s(approx (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (*.f64 b (+.f64 r (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (cos.f64 a))) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 r (sin.f64 a)) (cos.f64 a)))))) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (cos.f64 a))))))))
#s(approx (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (cos.f64 a))) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (/ (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (cos b)) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ (/ (* (sin b) r) (- 1 (* (tan a) (tan b)))) (cos a)) (cos b)) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (*.f64 r (+.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (cos.f64 a)))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (* b (+ r (* a (* b r)))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (*.f64 a r))))) (*.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (+.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 b (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (+.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (+.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (*.f64 b (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (tan b) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b))))
#s(approx (* b (+ r (* a (* b r)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 a r) (/.f64 r b))))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (- (+ a b) (* (PI) -1/2)) (*.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a r)) (*.f64 #s(literal -1 binary64) (/.f64 r b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ a b) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- (+ a b) (* (PI) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (sin (- (+ a b) (* (PI) -1/2))) (sin.f64 (-.f64 a (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 a (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
Calls

9 calls:

TimeVariablePoint
32.0ms
r
inf
21.0ms
r
-inf
14.0ms
a
0
13.0ms
a
inf
10.0ms
b
inf

rewrite189.0ms (3.6%)

Memory
11.0MiB live, 338.8MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059351
093341
1436330
22287330
04722324
Stop Event
iter-limit
node-limit
iter-limit
Counts
43 → 544
Calls
Call 1
Inputs
b
(sin.f64 b)
r
(*.f64 (sin.f64 b) r)
#s(literal 1 binary64)
a
(tan.f64 a)
(tan.f64 b)
(*.f64 (tan.f64 a) (tan.f64 b))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(cos.f64 a)
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a))
(cos.f64 b)
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)) (cos.f64 b))
(*.f64 b r)
(*.f64 a (*.f64 b r))
(+.f64 r (*.f64 a (*.f64 b r)))
(*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(literal -1/2 binary64)
#s(literal 2 binary64)
(pow.f64 a #s(literal 2 binary64))
(*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
(/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
(*.f64 r (sin.f64 b))
(+.f64 a b)
(PI.f64)
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (cos.f64 b) (cos.f64 a))
(sin.f64 a)
(*.f64 b (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
Outputs
b
(sin.f64 b)
r
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
#s(literal 1 binary64)
a
(*.f64 (sin.f64 a) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) a) (PI.f64))) (cos.f64 (+.f64 (+.f64 (PI.f64) a) (PI.f64))))
(/.f64 (neg.f64 (sin.f64 a)) (neg.f64 (cos.f64 a)))
(/.f64 (sin.f64 (+.f64 (PI.f64) a)) (neg.f64 (cos.f64 a)))
(/.f64 (sin.f64 a) (cos.f64 a))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (sin.f64 a)))
(tan.f64 (+.f64 (+.f64 (PI.f64) a) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) a))
(tan.f64 a)
(*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
(/.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64))) (cos.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 (+.f64 (PI.f64) b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (sin.f64 b)))
(tan.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 b)
(*.f64 (tan.f64 b) (tan.f64 a))
(*.f64 (tan.f64 a) (tan.f64 b))
(/.f64 (*.f64 (tan.f64 b) (sin.f64 a)) (cos.f64 a))
(/.f64 (*.f64 (tan.f64 a) (sin.f64 b)) (cos.f64 b))
(/.f64 (*.f64 (sin.f64 b) (tan.f64 a)) (cos.f64 b))
(/.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (tan.f64 b) (tan.f64 a)) (*.f64 (tan.f64 b) (tan.f64 a)))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 (tan.f64 b) (tan.f64 a)) (*.f64 (tan.f64 b) (tan.f64 a))) (*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(neg.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (tan.f64 a))) (tan.f64 b)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))
(+.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)))
(*.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (sin.f64 b))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (*.f64 (sin.f64 b) r))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(*.f64 r (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))) (*.f64 (sin.f64 b) r)))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))))
(sin.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 (fabs.f64 a)))
(cos.f64 (fabs.f64 (fabs.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 (fabs.f64 a))
(cos.f64 a)
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 r (cos.f64 a)))
(*.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 (sin.f64 b) (cos.f64 a)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 a))))
(*.f64 (*.f64 (sin.f64 b) r) (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (cos.f64 a)))
(*.f64 (sin.f64 b) (*.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 (sin.f64 b) (/.f64 r (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(*.f64 (sin.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(*.f64 r (/.f64 (sin.f64 b) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(/.f64 (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))
(/.f64 (*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)) (cos.f64 a)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) #s(literal 1 binary64)) (cos.f64 a))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (neg.f64 (cos.f64 a)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)) (cos.f64 a)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 a)) (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(sin.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 b)))
(cos.f64 (fabs.f64 (fabs.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 (fabs.f64 b))
(cos.f64 b)
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 a)) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (cos.f64 b)))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 a)) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 b)) (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(*.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 b))))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (*.f64 (tan.f64 b) r) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (cos.f64 a)))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (cos.f64 b)))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) #s(literal 1 binary64)) (cos.f64 b))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (neg.f64 (cos.f64 a)))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (cos.f64 a))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)) (cos.f64 a))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) #s(literal 1 binary64)) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (*.f64 (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (cos.f64 b))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 b)) (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))))
(neg.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (neg.f64 (cos.f64 b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(neg.f64 (/.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (cos.f64 b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(*.f64 r b)
(*.f64 b r)
(*.f64 (*.f64 a b) r)
(*.f64 (*.f64 a r) b)
(*.f64 (*.f64 r b) a)
(*.f64 a (*.f64 r b))
(*.f64 r (*.f64 a b))
(*.f64 b (*.f64 a r))
(*.f64 (+.f64 (*.f64 a b) #s(literal 1 binary64)) r)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 b) r) a) r)) r)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 r b) a) r)) r)
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r))
(/.f64 (-.f64 (*.f64 r r) (*.f64 (*.f64 (*.f64 (neg.f64 b) r) a) (*.f64 (*.f64 (neg.f64 b) r) a))) (+.f64 r (*.f64 (*.f64 (neg.f64 b) r) a)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 r b) a) #s(literal 3 binary64)) (pow.f64 r #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (-.f64 (*.f64 r r) (*.f64 (*.f64 (*.f64 r b) a) r))))
(/.f64 (-.f64 (pow.f64 r #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 b) r) a) #s(literal 3 binary64))) (+.f64 (*.f64 r r) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 b) r) a) (*.f64 (*.f64 (neg.f64 b) r) a)) (*.f64 r (*.f64 (*.f64 (neg.f64 b) r) a)))))
(/.f64 (-.f64 (*.f64 r r) (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a))) (-.f64 r (*.f64 (*.f64 r b) a)))
(/.f64 (+.f64 (pow.f64 r #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 r b) a) #s(literal 3 binary64))) (+.f64 (*.f64 r r) (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r (*.f64 (*.f64 r b) a)))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 b) r) a) r))
(-.f64 (*.f64 (*.f64 r b) a) (neg.f64 r))
(-.f64 r (*.f64 (*.f64 (neg.f64 b) r) a))
(+.f64 (*.f64 (*.f64 r b) a) r)
(+.f64 r (*.f64 (neg.f64 (neg.f64 a)) (*.f64 r b)))
(+.f64 r (neg.f64 (*.f64 (*.f64 (neg.f64 b) r) a)))
(+.f64 r (*.f64 (*.f64 r b) a))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 r b))) (*.f64 r b))
(*.f64 (+.f64 (*.f64 (*.f64 r b) a) r) b)
(*.f64 b (+.f64 (*.f64 (*.f64 r b) a) r))
(/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))
(/.f64 (+.f64 (pow.f64 (*.f64 r b) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 r b) a) b) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b)) (*.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
(-.f64 (*.f64 r b) (*.f64 (neg.f64 b) (*.f64 (*.f64 r b) a)))
(-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 (neg.f64 b) r) a) b))
(-.f64 (*.f64 r b) (neg.f64 (*.f64 (*.f64 (*.f64 r b) a) b)))
(+.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 r b))
(+.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b))
#s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 (+.f64 (*.f64 (*.f64 r b) a) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 (+.f64 (*.f64 (*.f64 r b) a) r) b)))
#s(literal -1/2 binary64)
#s(literal 2 binary64)
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 binary64)))
(*.f64 (pow.f64 a #s(literal 1 binary64)) a)
(*.f64 (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal -1/2 binary64) a) a)
(*.f64 (*.f64 a a) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 a a))
(*.f64 a (*.f64 a #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a a)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a)) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a)))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a a)) #s(literal 1 binary64)))
(-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))
#s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))
(*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))
(*.f64 (neg.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 b) r)))
(*.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 r b)))
(/.f64 (*.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 r b))
(/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)
(/.f64 (neg.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) (neg.f64 r))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))) (neg.f64 (*.f64 (neg.f64 b) r)))
(/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) r)
(/.f64 (neg.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) (*.f64 (neg.f64 b) r))
(/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(neg.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 (neg.f64 b) r)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b)
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r)
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r)
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))) (*.f64 (neg.f64 b) r))
(*.f64 (pow.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) (*.f64 r b))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 (neg.f64 b) r))))
(*.f64 (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) #s(literal 1 binary64))
(*.f64 (*.f64 r b) (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(pow.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b)) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) (/.f64 #s(literal 1 binary64) (*.f64 r b)))
(/.f64 (*.f64 (neg.f64 b) r) (neg.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 (neg.f64 b) r)))
(/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 (neg.f64 b) r)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b)))
(/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b))))
(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 (neg.f64 b) r))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) (*.f64 r b))) #s(literal -1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 b) a)) a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a)
(/.f64 (-.f64 (*.f64 a a) (*.f64 (neg.f64 b) (neg.f64 b))) (-.f64 a b))
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 a b))))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (*.f64 a a) (+.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (*.f64 a (neg.f64 b)))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 b b) (*.f64 a b))))
(neg.f64 (-.f64 (neg.f64 b) a))
(-.f64 a (neg.f64 b))
(-.f64 b (neg.f64 a))
(+.f64 a (neg.f64 (neg.f64 b)))
(+.f64 a b)
(+.f64 b a)
(PI.f64)
(*.f64 (*.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal -1/2 binary64)))
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))) (+.f64 a b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) a)) a)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (+.f64 a b))) (+.f64 a b))
(/.f64 (+.f64 (*.f64 (+.f64 a b) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (+.f64 a b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (-.f64 a (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (+.f64 a b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (*.f64 a (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (+.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (+.f64 (*.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64))))))
(neg.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) a) b))
(-.f64 (+.f64 a b) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal -1/2 binary64)))
(-.f64 (+.f64 a b) (neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(-.f64 a (-.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 a (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(-.f64 a (neg.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) a)
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))
(+.f64 (+.f64 a b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 a (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(+.f64 b (-.f64 a (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(+.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b)))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b)))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (+.f64 (-.f64 (neg.f64 b) a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) a))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (*.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (neg.f64 (cos.f64 (+.f64 a b))) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 (neg.f64 b))))
(*.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 a)) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (cos.f64 b)))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 a)) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 b)) (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(*.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 b))))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(*.f64 (*.f64 (tan.f64 b) r) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (cos.f64 a)))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (cos.f64 b)))
(*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) #s(literal 1 binary64)) (cos.f64 b))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (neg.f64 (cos.f64 a)))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (cos.f64 a))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)) (cos.f64 a))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) #s(literal 1 binary64)) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 a)) #s(literal 1 binary64)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (*.f64 (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (cos.f64 b))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 b)) (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))))
(neg.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (neg.f64 (cos.f64 b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(neg.f64 (/.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (cos.f64 b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) a)) (cos.f64 (-.f64 (fabs.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 a))) (cos.f64 (-.f64 b (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) b)) (cos.f64 (-.f64 (fabs.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 b))) (cos.f64 (-.f64 a (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (cos.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 b (*.f64 (PI.f64) #s(literal -1/2 binary64))) a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
(+.f64 (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)))
(sin.f64 a)
(*.f64 (sin.f64 a) b)
(*.f64 b (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))) (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (-.f64 (*.f64 (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))) (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))) (+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (*.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))))))
(neg.f64 (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))
(+.f64 (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))) (*.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))) r)
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (sin.f64 b) r))
(*.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a)))))
(*.f64 (*.f64 (sin.f64 b) r) (/.f64 #s(literal -1 binary64) (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a)))))
(*.f64 (sin.f64 b) (*.f64 r (/.f64 #s(literal -1 binary64) (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a))))))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b))) (*.f64 (sin.f64 b) r)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) b)) (*.f64 (cos.f64 b) (cos.f64 a)))))

eval88.0ms (1.7%)

Memory
-9.6MiB live, 136.2MiB allocated; 32ms collecting garbage
Compiler

Compiled 21 745 to 3 867 computations (82.2% saved)

prune58.0ms (1.1%)

Memory
7.0MiB live, 107.1MiB allocated; 6ms collecting garbage
Pruning

84 alts after pruning (76 fresh and 8 done)

PrunedKeptTotal
New63736673
Fresh174057
Picked505
Done-286
Total65784741
Accuracy
100.0%
Counts
741 → 84
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.5%
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (sin.f64 b)))))) (cos.f64 a)) (cos.f64 b))
78.3%
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) #s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))) (cos.f64 a)) (cos.f64 b))
99.0%
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))) (*.f64 (sin.f64 b) r))) (cos.f64 a)) (cos.f64 b))
99.5%
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (cos.f64 b))
99.5%
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
99.5%
(/.f64 (*.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
60.6%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b)))) (+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
77.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b)))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
61.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (cos.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a))))
38.7%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
37.1%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
33.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
38.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 #s(approx (+ a b) b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
38.1%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
36.5%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
19.2%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
54.7%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
66.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
64.1%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
50.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
61.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
60.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
52.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
38.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
55.4%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
51.3%
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
98.9%
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))))
99.5%
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
61.5%
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
77.5%
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
77.5%
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
60.2%
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
77.4%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
99.5%
(*.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
61.5%
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
77.4%
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
50.5%
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
55.4%
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
34.3%
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
34.3%
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
34.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
32.5%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
33.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
50.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
32.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
20.5%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
33.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
32.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
32.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
32.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
50.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
20.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
57.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
33.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
51.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
33.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
25.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
14.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
26.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
31.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
32.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
31.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
12.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
26.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
51.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 a (+.f64 (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
16.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
Compiler

Compiled 2 079 to 1 421 computations (31.6% saved)

regimes1.1s (21.6%)

Memory
46.7MiB live, 1 746.7MiB allocated; 234ms collecting garbage
Counts
25 → 1
28 → 1
46 → 1
47 → 1
48 → 3
49 → 1
53 → 1
83 → 1
91 → 1
94 → 1
95 → 1
100 → 1
126 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
Call 2
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
Call 3
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
Outputs
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
Call 4
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
Call 5
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
Call 6
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
Outputs
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
Call 7
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
Outputs
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
Call 8
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 #s(approx (+ a b) b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Call 9
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 #s(approx (+ a b) b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) #s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))) (cos.f64 a)) (cos.f64 b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
Outputs
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) #s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))) (cos.f64 a)) (cos.f64 b))
Call 10
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 #s(approx (+ a b) b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) #s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))) (cos.f64 a)) (cos.f64 b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 a) (sin.f64 b))))
Outputs
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
Call 11
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 #s(approx (+ a b) b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) #s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))) (cos.f64 a)) (cos.f64 b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
Outputs
(*.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
Call 12
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 #s(approx (+ a b) b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) #s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))) (cos.f64 a)) (cos.f64 b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (*.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (+.f64 (*.f64 (sin.f64 a) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
Outputs
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
Call 13
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a b) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 (*.f64 a r) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b #s(approx (+ r (* a (* b r))) (*.f64 b (+.f64 (*.f64 a r) (/.f64 r b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (+.f64 r (*.f64 b (+.f64 (*.f64 a r) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a) a) #s(literal -1 binary64))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 r (*.f64 (*.f64 r b) a))) (*.f64 (*.f64 r b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 r b) #s(approx (cos a) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 b (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 r b) a) (*.f64 (*.f64 r b) a)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 r b) a) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 (*.f64 #s(literal -1/2 binary64) a) a))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (/.f64 (-.f64 (*.f64 (*.f64 r b) (*.f64 r b)) (*.f64 (*.f64 (*.f64 (*.f64 r b) a) b) (*.f64 (*.f64 (*.f64 r b) a) b))) (-.f64 (*.f64 r b) (*.f64 (*.f64 (*.f64 r b) a) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) #s(approx (* b (+ r (* a (* b r)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (neg b) (- a (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (sin (- (+ a b) (* (PI) -1/2)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b r)) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos a) (* b r)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (sin.f64 b) r))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (+ a b) (* (PI) -1/2)) (-.f64 a (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 #s(approx (+ a b) b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(*.f64 (neg.f64 r) (*.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (*.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (- (neg b) (- a (* 1/2 (PI))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 b a))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (- (neg b) (- a (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a b))) (/.f64 a b)) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (/.f64 (-.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 a b) #s(literal 1 binary64))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 a) (*.f64 b r))) #s(literal -1 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) #s(approx (- 1 (* (tan a) (tan b))) #s(literal 1 binary64))) (cos.f64 a)) (cos.f64 b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 (*.f64 a r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (tan.f64 b) r)))
(*.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) (/.f64 r (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
(/.f64 (*.f64 (tan.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))) (cos.f64 a)))
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (*.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (+.f64 (*.f64 (sin.f64 a) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (cos.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 (/.f64 (sin.f64 b) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))))) (cos.f64 b))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (cos.f64 a))
(/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 #s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) r))
(/.f64 (*.f64 r (sin.f64 b)) (+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 a b)))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)) (cos.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (sin.f64 a) (cos.f64 (-.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 a) (sin.f64 (-.f64 (neg.f64 b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (/.f64 (*.f64 (sin.f64 b) r) (*.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a)))))))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 a))) (*.f64 (sin.f64 b) r))) (cos.f64 a)) (cos.f64 b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (cos.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (*.f64 a (+.f64 (/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
(/.f64 (/.f64 (/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (sin.f64 b)))))) (cos.f64 a)) (cos.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sin.f64 a) (cos.f64 b)) (sin.f64 b)) (cos.f64 a))) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))) (-.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b)))) (+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (neg.f64 (sin.f64 b))) (*.f64 (sin.f64 (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 b)))))))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
Calls

52 calls:

45.0ms
b
35.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
35.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
34.0ms
r
33.0ms
a
Results
AccuracySegmentsBranch
34.0%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
34.0%1r
34.0%1b
34.0%1a
51.1%1r
51.1%1b
51.1%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
51.1%1a
51.3%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
51.3%1r
51.3%1a
51.3%1b
55.4%1r
55.4%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
55.4%1b
55.4%1a
64.0%3(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
62.4%2r
77.4%3b
77.4%3a
77.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
77.5%1r
77.5%1b
77.5%1a
77.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
77.5%1r
77.5%1b
77.5%1a
77.5%1r
77.5%1a
77.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
77.5%1b
78.3%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
78.3%1r
78.3%1a
78.3%1b
99.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.5%1r
99.5%1a
99.5%1b
99.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.5%1r
99.5%1a
99.5%1b
99.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.5%1r
99.5%1a
99.5%1b
99.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.5%1r
99.5%1a
99.5%1b
Compiler

Compiled 3 203 to 825 computations (74.2% saved)

bsearch54.0ms (1.0%)

Memory
-37.9MiB live, 54.0MiB allocated; 6ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
21.0ms
1.1119073532322554e-5
0.0008221471154639779
29.0ms
-1993.3056151606133
-1.6488761858564831e-9
Samples
32.0ms200×1valid
5.0ms72×0valid
Compiler

Compiled 403 to 371 computations (7.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 27.0ms
ival-cos: 10.0ms (37.4% of total)
ival-sin: 7.0ms (26.2% of total)
adjust: 4.0ms (15.0% of total)
ival-add!: 2.0ms (7.5% of total)
ival-div!: 2.0ms (7.5% of total)
ival-mult!: 1.0ms (3.7% of total)

derivations119.0ms (2.2%)

Memory
45.4MiB live, 90.9MiB allocated; 4ms collecting garbage
Stop Event
fuel
Compiler

Compiled 210 to 71 computations (66.2% saved)

preprocess92.0ms (1.7%)

Memory
-13.5MiB live, 172.9MiB allocated; 17ms collecting garbage
Compiler

Compiled 639 to 387 computations (39.4% saved)

end0.0ms (0.0%)

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

Profiling

Loading profile data...