rsin A (should all be same)

Time bar (total: 4.8s)

start0.0ms (0%)

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

analyze261.0ms (5.5%)

Memory
34.7MiB live, 364.0MiB allocated; 56ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
0%0%99.9%0.1%0%0%0%4
0%0%99.9%0.1%0%0%0%5
0%0%99.9%0.1%0%0%0%6
12.5%12.5%87.4%0.1%0%0%0%7
12.5%12.5%87.4%0.1%0%0%0%8
18.8%18.7%81.1%0.1%0%0%0%9
21.9%21.8%78%0.1%0%0%0%10
21.9%21.8%78%0.1%0%0%0%11
23.4%23.4%76.5%0.1%0%0%0%12
Compiler

Compiled 11 to 10 computations (9.1% saved)

sample1.7s (34.7%)

Memory
21.7MiB live, 1 056.3MiB allocated; 881ms collecting garbage
Samples
884.0ms6 018×1valid
120.0ms2 237×0valid
0.0ms1×2valid
Precisions
Click to see histograms. Total time spent on operations: 769.0ms
ival-cos: 278.0ms (36.1% of total)
ival-sin: 201.0ms (26.1% of total)
adjust: 127.0ms (16.5% of total)
ival-add!: 62.0ms (8.1% of total)
ival-div!: 58.0ms (7.5% of total)
ival-mult!: 44.0ms (5.7% of total)
Bogosity

preprocess43.0ms (0.9%)

Memory
-34.6MiB live, 10.5MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03897
110397
225197
357397
4101397
5204597
6433797
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶78.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Symmetry

(negabs r)

Compiler

Compiled 16 to 16 computations (0% saved)

series16.0ms (0.3%)

Memory
16.3MiB live, 16.3MiB allocated; 0ms collecting garbage
Counts
8 → 42
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(cos.f64 (+.f64 a b))
(+.f64 a b)
a
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Calls

9 calls:

TimeVariablePointExpression
2.0ms
b
@-inf
((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
r
@inf
((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
r
@0
((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
a
@0
((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
r
@-inf
((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)

rewrite194.0ms (4%)

Memory
26.0MiB live, 202.2MiB allocated; 79ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0228937
0235901
11325845
08049811
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
50 → 77
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(cos.f64 (+.f64 a b))
(+.f64 a b)
a
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.f64 (+.f64 a b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.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)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.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 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.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))))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 b b) b (*.f64 (*.f64 a a) a)) (fma.f64 b b (-.f64 (*.f64 a a) (*.f64 b a))))
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (neg.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b))) (neg.f64 (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))))
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(-.f64 (/.f64 (*.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) a) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))) (/.f64 (*.f64 (*.f64 b b) b) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))))
(+.f64 a b)
(+.f64 b a)
a
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (sin b)) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (fma.f64 #s(literal -1/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 #s(literal 1/6 binary64) (*.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.f64 (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))))) a (*.f64 r (tan.f64 b))))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx a a)
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 b b) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 (cos.f64 a) #s(literal -1/2 binary64))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (neg.f64 b))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))

eval8.0ms (0.2%)

Memory
15.8MiB live, 15.8MiB allocated; 0ms collecting garbage
Compiler

Compiled 778 to 370 computations (52.4% saved)

prune24.0ms (0.5%)

Memory
-18.6MiB live, 26.7MiB allocated; 19ms collecting garbage
Pruning

23 alts after pruning (23 fresh and 0 done)

PrunedKeptTotal
New482371
Fresh000
Picked101
Done000
Total492372
Accuracy
99.9%
Counts
72 → 23
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.5%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
78.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
40.5%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
78.2%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
99.4%
(/.f64 (*.f64 r (sin.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))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.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)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.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)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
38.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶63.1%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
61.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
▶53.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
52.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
59.1%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
51.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
58.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))))
50.2%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
50.7%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
50.2%
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
78.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
▶50.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
▶61.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
50.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
Compiler

Compiled 674 to 592 computations (12.2% saved)

series112.0ms (2.3%)

Memory
-36.5MiB live, 88.1MiB allocated; 40ms collecting garbage
Counts
37 → 168
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
#s(literal 1 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b)
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a)))
(/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))))
(*.f64 (sin.f64 a) r)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))
(cos.f64 (*.f64 #s(literal 2 binary64) a))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 r (cos.f64 a))
Outputs
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a)))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a r)))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* -1 (pow a 2)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (cos (* 2 a)) #s(hole binary64 1))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* -2 (pow a 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 a))))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (* 1/2 (cos (* 2 a)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (cos (* 2 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))))
Calls

9 calls:

TimeVariablePointExpression
44.0ms
r
@-inf
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) 2 (/ r (cos a)))
21.0ms
b
@0
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) 2 (/ r (cos a)))
10.0ms
r
@inf
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) 2 (/ r (cos a)))
7.0ms
r
@0
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) 2 (/ r (cos a)))
6.0ms
a
@-inf
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) 2 (/ r (cos a)))

rewrite201.0ms (4.2%)

Memory
22.9MiB live, 150.8MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07064278
07573747
141623715
081173560
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
205 → 364
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
#s(literal 1 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b)
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a)))
(/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))))
(*.f64 (sin.f64 a) r)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))
(cos.f64 (*.f64 #s(literal 2 binary64) a))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 r (cos.f64 a))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a)))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a r)))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* -1 (pow a 2)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (cos (* 2 a)) #s(hole binary64 1))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* -2 (pow a 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 a))))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (* 1/2 (cos (* 2 a)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (cos (* 2 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 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 a (neg.f64 b))) (cos.f64 (-.f64 a (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) a)) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
(pow.f64 (cos.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64)))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
a
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(sin.f64 a)
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) a))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) a))))
(cos.f64 (neg.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(cos.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(*.f64 a (+.f64 (/.f64 b a) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) a (*.f64 (/.f64 b a) a))
(fma.f64 a #s(literal 1 binary64) (*.f64 a (/.f64 b a)))
(+.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 b a) a))
(+.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 a (/.f64 b a)))
(/.f64 (fma.f64 (neg.f64 b) #s(literal 2 binary64) (*.f64 (neg.f64 a) #s(literal 2 binary64))) (*.f64 (neg.f64 a) #s(literal 2 binary64)))
(/.f64 (fma.f64 b #s(literal 2 binary64) (+.f64 a a)) (+.f64 a a))
(/.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 a) (*.f64 #s(literal 2 binary64) (neg.f64 b))) (*.f64 #s(literal 2 binary64) (neg.f64 a)))
(/.f64 (fma.f64 #s(literal 2 binary64) a (*.f64 #s(literal 2 binary64) b)) (+.f64 a a))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 b a) (/.f64 b a))) (-.f64 #s(literal 1 binary64) (/.f64 b a)))
(/.f64 (-.f64 (*.f64 (/.f64 b a) (/.f64 b a)) #s(literal 1 binary64)) (-.f64 (/.f64 b a) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 a a) a))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 b a) (/.f64 b a)) (*.f64 #s(literal 1 binary64) (/.f64 b a)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 a a) a)) #s(literal 1 binary64)) (fma.f64 (/.f64 b a) (/.f64 b a) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 b a) #s(literal 1 binary64)))))
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 b a))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
#s(literal 1 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b)
(*.f64 b (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))
(fma.f64 (/.f64 r (cos.f64 a)) b (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) b))
(fma.f64 b (/.f64 r (cos.f64 a)) (*.f64 b (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (/.f64 r (cos.f64 a)) b) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) b))
(+.f64 (*.f64 b (/.f64 r (cos.f64 a))) (*.f64 b (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 a) r) b)) (neg.f64 (cos.f64 a)) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 r))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 a))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 a) r) b)) (cos.f64 a) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) r)) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 a)))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (neg.f64 (cos.f64 a)) (*.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 r))) (*.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 a))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (cos.f64 a) (*.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
(/.f64 (fma.f64 (neg.f64 r) (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (cos.f64 a)) (neg.f64 (*.f64 (*.f64 (sin.f64 a) r) b)))) (*.f64 (neg.f64 (cos.f64 a)) (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 a)) (*.f64 (*.f64 (sin.f64 a) r) b))) (*.f64 (neg.f64 (cos.f64 a)) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 r (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 a) (neg.f64 (*.f64 (*.f64 (sin.f64 a) r) b)))) (*.f64 (cos.f64 a) (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))
(/.f64 (-.f64 (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))))
(/.f64 (+.f64 (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 a) (*.f64 (*.f64 (sin.f64 a) r) b))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
(fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) b (/.f64 r (cos.f64 a)))
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a)))
(+.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a)))
(+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 r (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (*.f64 (sin.f64 a) r)) (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 a) r)
(*.f64 r (sin.f64 a))
(*.f64 (fabs.f64 (cos.f64 a)) (fabs.f64 (cos.f64 a)))
(*.f64 (exp.f64 (log.f64 (cos.f64 a))) (exp.f64 (log.f64 (cos.f64 a))))
(*.f64 (neg.f64 (cos.f64 a)) (neg.f64 (cos.f64 a)))
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (exp.f64 (log.f64 (cos.f64 a))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) a)) (cos.f64 (-.f64 (neg.f64 a) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 a))) (cos.f64 (-.f64 a (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a a)) (cos.f64 (-.f64 a a))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 a a)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -2 binary64)))
(fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 a a))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 a)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 a a)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a a))))
(cos.f64 (neg.f64 (+.f64 a a)))
(cos.f64 (+.f64 a a))
(+.f64 (*.f64 (sin.f64 (+.f64 a a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) a)
(*.f64 a #s(literal 2 binary64))
(+.f64 a a)
#s(literal 2 binary64)
(/.f64 (neg.f64 r) (neg.f64 (cos.f64 a)))
(/.f64 r (cos.f64 a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (sin b)) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (tan b)) (*.f64 (tan.f64 b) r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (sin a) r) (*.f64 (sin.f64 a) r))
#s(approx (/ r (cos a)) (/.f64 r (cos.f64 a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (neg.f64 (*.f64 (*.f64 b r) (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (neg.f64 r) (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 a a)) (sin.f64 b) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal 1/120 binary64) (*.f64 (sin.f64 b) #s(literal -1/6 binary64))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (fma.f64 #s(literal 1/120 binary64) (sin.f64 b) (*.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 a a)) (sin.f64 b))) (*.f64 a a))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* (+ (/ b a) 1) a) b)
#s(approx (* (+ (/ b a) 1) a) (+.f64 a b))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a))
#s(approx (/ b a) (/.f64 b a))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (*.f64 (*.f64 b r) a) #s(literal 1/2 binary64) (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) b) a (*.f64 (*.f64 b r) #s(literal 1/2 binary64))) a (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r)
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (*.f64 a r) #s(literal 1/2 binary64) (*.f64 b r)) a r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) a (*.f64 #s(literal 1/2 binary64) r)) a (*.f64 b r)) a r))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 a r))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 (fma.f64 (*.f64 r #s(literal 5/6 binary64)) (*.f64 a a) r) a))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal 1/3 binary64) r (neg.f64 (*.f64 r #s(literal 5/6 binary64))))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) r)) (neg.f64 r)) (*.f64 a a) r) a))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) r) (neg.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal 1/3 binary64) r (neg.f64 (*.f64 r #s(literal 5/6 binary64))))))) (fma.f64 #s(literal -2/45 binary64) r (*.f64 #s(literal 1/3 binary64) (*.f64 r #s(literal 5/6 binary64))))) (*.f64 a a) (*.f64 #s(literal 1/120 binary64) r)) (fma.f64 #s(literal 1/3 binary64) r (neg.f64 (*.f64 r #s(literal 5/6 binary64))))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) r)) (neg.f64 r)) (*.f64 a a) r) a))
#s(approx (* (sin a) r) (*.f64 a r))
#s(approx (* (sin a) r) (*.f64 (fma.f64 (*.f64 (*.f64 a a) r) #s(literal -1/6 binary64) r) a))
#s(approx (* (sin a) r) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 a a) r) a))
#s(approx (* (sin a) r) (*.f64 (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (*.f64 (*.f64 a a) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 a a) r) a))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (+.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 a a) #s(literal 1/3 binary64)) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 a))) (+.f64 (neg.f64 (*.f64 a a)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 a a) #s(literal 1/3 binary64)) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 a)) #s(literal 1 binary64))
#s(approx (cos (* 2 a)) (fma.f64 #s(literal -2 binary64) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (* 2 a)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (* 2 a)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 a a) #s(literal 2/3 binary64)) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (* 2 a) (+.f64 a a))
#s(approx (/ r (cos a)) r)
#s(approx (/ r (cos a)) (fma.f64 (*.f64 (*.f64 a a) r) #s(literal 1/2 binary64) r))
#s(approx (/ r (cos a)) (fma.f64 (fma.f64 (neg.f64 (*.f64 a a)) (*.f64 r #s(literal -5/24 binary64)) (*.f64 #s(literal 1/2 binary64) r)) (*.f64 a a) r))
#s(approx (/ r (cos a)) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (*.f64 (*.f64 r #s(literal -5/24 binary64)) #s(literal 1/2 binary64))))) (*.f64 r #s(literal -5/24 binary64))) (*.f64 a a) (*.f64 #s(literal 1/2 binary64) r)) (*.f64 a a) r))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (* (+ (/ b a) 1) a) a)
#s(approx (* (+ (/ b a) 1) a) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 (/.f64 b a) #s(literal 1 binary64)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 a)) (cos.f64 (+.f64 a a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (*.f64 (sin.f64 a) #s(literal -1/6 binary64))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 (sin.f64 a) #s(literal 1/120 binary64))) (*.f64 b b))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 17/315 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 2/15 binary64) r)) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (tan b) b)
#s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a)))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (+ (/ b a) 1) a) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (/.f64 (*.f64 (*.f64 (*.f64 b b) r) (sin.f64 a)) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (-.f64 a (neg.f64 b))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (neg.f64 b) (+.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (neg.f64 r) (*.f64 (cos.f64 a) b)))))

eval54.0ms (1.1%)

Memory
-2.0MiB live, 99.6MiB allocated; 18ms collecting garbage
Compiler

Compiled 4 363 to 1 946 computations (55.4% saved)

prune49.0ms (1%)

Memory
-4.4MiB live, 88.4MiB allocated; 6ms collecting garbage
Pruning

58 alts after pruning (58 fresh and 0 done)

PrunedKeptTotal
New33751388
Fresh11718
Picked505
Done000
Total35358411
Accuracy
99.9%
Counts
411 → 58
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
78.5%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
53.9%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
99.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
78.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
53.9%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
40.5%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
53.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.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)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
99.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 b) (sin.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (*.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 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
48.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64))))))
61.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
66.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
51.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
52.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
56.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
64.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
58.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
51.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
51.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
51.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
62.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
55.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
38.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
36.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
38.0%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
36.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
61.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64))) a))))
63.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a)) a))))
46.4%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
52.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
▶59.1%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
51.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
31.4%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
50.6%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
50.5%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
50.0%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
50.8%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
50.0%
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
▶78.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
63.1%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
53.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
61.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
50.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
61.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
50.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
▶34.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
▶31.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
61.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
33.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
31.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
Compiler

Compiled 2 052 to 1 930 computations (5.9% saved)

series95.0ms (2%)

Memory
-18.4MiB live, 80.9MiB allocated; 12ms collecting garbage
Counts
33 → 190
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b)
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
(fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))
(neg.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))
(+.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(tan.f64 b)
(tan.f64 (PI.f64))
(PI.f64)
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))
#s(literal 1 binary64)
(*.f64 (tan.f64 b) (tan.f64 (PI.f64)))
Outputs
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* a (+ (* -1 (sin b)) (/ (cos b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* -1 (* a (+ (sin b) (* -1 (/ (cos b) a)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 1))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ 1 (* b (+ (* -1 a) (* -1/2 b))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ 1 (* b (+ (* -1 a) (* b (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ b (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* 1/3 (pow b 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* b (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* -1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* (pow b 2) (- (* -2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* b (sin (PI))) (cos (PI)))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ (sin (PI)) (cos (PI)))) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 2/15 (/ (sin (PI)) (cos (PI)))))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Calls

9 calls:

TimeVariablePointExpression
12.0ms
r
@-inf
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (PI) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))))
8.0ms
b
@-inf
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (PI) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))))
8.0ms
b
@inf
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (PI) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))))
7.0ms
r
@0
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (PI) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))))
7.0ms
r
@inf
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (PI) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))))

rewrite199.0ms (4.2%)

Memory
52.6MiB live, 190.3MiB allocated; 27ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08136094
08604712
149594710
081684493
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
223 → 410
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b)
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
(fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))
(neg.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))
(+.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(tan.f64 b)
(tan.f64 (PI.f64))
(PI.f64)
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))
#s(literal 1 binary64)
(*.f64 (tan.f64 b) (tan.f64 (PI.f64)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* a (+ (* -1 (sin b)) (/ (cos b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* -1 (* a (+ (sin b) (* -1 (/ (cos b) a)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 1))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ 1 (* b (+ (* -1 a) (* -1/2 b))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (+ 1 (* b (+ (* -1 a) (* b (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ b (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* 1/3 (pow b 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* b (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* -1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* (pow b 2) (- (* -2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* b (sin (PI))) (cos (PI)))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ (sin (PI)) (cos (PI)))) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 2/15 (/ (sin (PI)) (cos (PI)))))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Outputs
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(*.f64 (sin.f64 b) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 (sin.f64 b) #s(literal 1 binary64))
(sin.f64 b)
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (+.f64 (neg.f64 b) a)))
(/.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 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (cos.f64 b) #s(literal 1 binary64))
(pow.f64 (pow.f64 (cos.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (cos.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64)))
(/.f64 (cos.f64 b) #s(literal 1 binary64))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (cos.f64 a) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) #s(literal -1 binary64))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 (cos.f64 a) #s(literal 1 binary64))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
a
(*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (sin.f64 a) (neg.f64 (sin.f64 b)))
(/.f64 (+.f64 (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 a b)) (cos.f64 (+.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (PI.f64)) a)) (cos.f64 (+.f64 (+.f64 b (PI.f64)) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a (+.f64 b (PI.f64)))) (cos.f64 (+.f64 a (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(neg.f64 (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 #s(literal -1 binary64) (sin.f64 b))
(*.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 b (neg.f64 (PI.f64)))) (sin.f64 (+.f64 b (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 b (PI.f64))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 b (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(neg.f64 (sin.f64 b))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (neg.f64 b))
(sin.f64 (+.f64 b (PI.f64)))
(fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(fma.f64 (sin.f64 b) #s(literal -1 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(*.f64 (sin.f64 a) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 a) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(/.f64 (sin.f64 a) #s(literal 1 binary64))
(sin.f64 a)
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b)
(*.f64 b #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (+.f64 (neg.f64 b) a)))
(/.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 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(/.f64 (-.f64 (*.f64 a a) (*.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 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 (neg.f64 b) (neg.f64 b)) (neg.f64 b))) (fma.f64 a a (fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 a (neg.f64 b)))))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(-.f64 a (neg.f64 b))
(+.f64 a b)
(+.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (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)))) (pow.f64 (*.f64 (neg.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (-.f64 (cos.f64 b) (*.f64 (neg.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.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) b))))) (-.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))
(/.f64 (+.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (-.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (*.f64 (neg.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 a) (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)))) (*.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))))
(fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))
(fma.f64 (*.f64 (sin.f64 b) a) #s(literal -1 binary64) (cos.f64 b))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) a) (cos.f64 b))
(fma.f64 (cos.f64 b) #s(literal 1 binary64) (*.f64 (neg.f64 a) (sin.f64 b)))
(fma.f64 (sin.f64 b) (neg.f64 a) (cos.f64 b))
(-.f64 (cos.f64 b) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 b) a)))
(+.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b))
(+.f64 (cos.f64 b) (*.f64 (neg.f64 a) (sin.f64 b)))
(*.f64 #s(literal -1 binary64) a)
(*.f64 a #s(literal -1 binary64))
(neg.f64 a)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (*.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) r)) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b))
(/.f64 (neg.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (PI.f64) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 b (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(+.f64 (/.f64 (tan.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))))
(/.f64 (-.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 (tan.f64 b) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (sin.f64 b)) (*.f64 #s(literal -1 binary64) (cos.f64 b)))
(+.f64 #s(literal 0 binary64) (tan.f64 b))
(+.f64 (tan.f64 b) #s(literal 0 binary64))
(/.f64 (neg.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (PI.f64) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 b (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(+.f64 (/.f64 (tan.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))))
#s(literal 0 binary64)
(PI.f64)
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (tan.f64 b) #s(literal 0 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)) #s(literal 0 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (tan.f64 b) #s(literal 0 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 b)) #s(literal 0 binary64)))
#s(literal 1 binary64)
(*.f64 #s(literal 0 binary64) (tan.f64 b))
(*.f64 (tan.f64 b) #s(literal 0 binary64))
(*.f64 (sin.f64 b) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 b))))
(/.f64 (/.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64)) (cos.f64 b)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64))) (neg.f64 (*.f64 #s(literal -1 binary64) (cos.f64 b))))
(/.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64)) (*.f64 #s(literal -1 binary64) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (sin b)) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 (tan.f64 b) r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (neg.f64 (*.f64 (*.f64 b r) (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (fma.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 a) (sin.f64 b)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a a)) (sin.f64 b) (neg.f64 (sin.f64 b))) a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/120 binary64) (*.f64 (sin.f64 b) #s(literal 1/6 binary64))) (*.f64 a a) (neg.f64 (sin.f64 b))) a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 b) (*.f64 (fma.f64 #s(literal -1/120 binary64) (sin.f64 b) (*.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 a a)) (sin.f64 b))) (*.f64 a a))) (*.f64 a a) (neg.f64 (sin.f64 b))) a))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (*.f64 (*.f64 b r) a) #s(literal 1/2 binary64) (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) b) a (*.f64 (*.f64 b r) #s(literal 1/2 binary64))) a (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r)
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (*.f64 a r) #s(literal 1/2 binary64) (*.f64 b r)) a r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) a (*.f64 #s(literal 1/2 binary64) r)) a (*.f64 b r)) a r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (/.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))))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (tan.f64 b) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (neg.f64 (/.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))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.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))))) #s(literal -1/2 binary64) (fma.f64 (/.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))))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (tan.f64 b) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b)))) a)) (fma.f64 #s(literal -1/2 binary64) (tan.f64 b) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.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))))))) a (tan.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (cos.f64 b))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (neg a) (neg.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (+.f64 (/.f64 (cos.f64 b) a) (neg.f64 (sin.f64 b))) a))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (+.f64 (neg.f64 (/.f64 (cos.f64 b) a)) (sin.f64 b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (fma.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 b) (sin.f64 a)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (sin.f64 a) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/120 binary64) (*.f64 (sin.f64 a) #s(literal 1/6 binary64))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/5040 binary64) (*.f64 (sin.f64 a) #s(literal -1/120 binary64))) (*.f64 b b))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (neg (sin b)) (neg.f64 b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (neg.f64 a) b #s(literal 1 binary64)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))
#s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 a b) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) b (neg.f64 a)) b #s(literal 1 binary64)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 #s(literal 0 binary64) r))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 (fma.f64 b (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)) r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) r) (fma.f64 #s(literal -1/3 binary64) (*.f64 #s(literal 0 binary64) r) (neg.f64 (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal 1 binary64))))) b) (neg.f64 (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)))) b r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+.f64 #s(literal 0 binary64) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) b #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (tan b) (tan (PI))) #s(literal 0 binary64))
#s(approx (+ (tan b) (tan (PI))) (+.f64 #s(literal 0 binary64) b))
#s(approx (+ (tan b) (tan (PI))) (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (tan b) (tan (PI))) (fma.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b)
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))
#s(approx (- 1 (* (tan b) (tan (PI)))) (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) b)) #s(literal 1 binary64)))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal -1/3 binary64)) #s(literal 0 binary64)) b #s(literal 1 binary64)))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/15 binary64) (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 0 binary64)) (*.f64 b b)) #s(literal 0 binary64)) b #s(literal 1 binary64)))
#s(approx (* (tan b) (tan (PI))) (*.f64 #s(literal 0 binary64) b))
#s(approx (* (tan b) (tan (PI))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 1/3 binary64) #s(literal 0 binary64)) b))
#s(approx (* (tan b) (tan (PI))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 2/15 binary64) #s(literal 0 binary64)) (*.f64 b b) #s(literal 0 binary64)) b))
#s(approx (* (tan b) (tan (PI))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 17/315 binary64) #s(literal 0 binary64)) (*.f64 b b) #s(literal 0 binary64)) (*.f64 b b) #s(literal 0 binary64)) b))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (neg (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) (*.f64 b b)) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 r (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (fma.f64 r (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (+ (tan b) (tan (PI))) (+.f64 (tan.f64 b) #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (- 1 (* (tan b) (tan (PI)))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))
#s(approx (* (tan b) (tan (PI))) (*.f64 (tan.f64 b) #s(literal 0 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (neg.f64 b) (+.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 r (*.f64 (cos.f64 a) b))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))

eval49.0ms (1%)

Memory
-33.5MiB live, 102.4MiB allocated; 15ms collecting garbage
Compiler

Compiled 4 158 to 1 690 computations (59.4% saved)

prune63.0ms (1.3%)

Memory
-4.1MiB live, 110.7MiB allocated; 30ms collecting garbage
Pruning

66 alts after pruning (63 fresh and 3 done)

PrunedKeptTotal
New35122373
Fresh124153
Picked235
Done000
Total36566431
Accuracy
100.0%
Counts
431 → 66
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
78.5%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
53.9%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
59.1%
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
99.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
▶78.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
53.9%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
40.5%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
▶99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
✓99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
79.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))
51.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
52.9%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
56.1%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b)) (sin.f64 a))))
58.9%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.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)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
99.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 b) (sin.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (*.f64 (sin.f64 b) (sin.f64 a))))
48.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64))))))
61.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
66.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
64.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
58.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
51.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
51.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
51.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
62.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
55.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
38.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
36.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
38.0%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
36.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
61.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64))) a))))
63.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a)) a))))
46.4%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
52.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
58.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.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) b))))) (-.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))))
58.2%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 a) (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)))) (*.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))))))
33.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
37.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
31.4%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
▶50.5%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
50.0%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
50.8%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
33.3%
(/.f64 (*.f64 r #s(approx (sin b) b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
50.0%
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
✓78.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
63.1%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
▶61.8%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
51.0%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
50.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
61.9%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
61.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
50.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
50.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
✓34.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
31.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
61.5%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
31.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
▶17.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
33.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
31.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
Compiler

Compiled 2 347 to 2 218 computations (5.5% saved)

series44.0ms (0.9%)

Memory
24.0MiB live, 70.7MiB allocated; 3ms collecting garbage
Counts
40 → 203
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
#s(literal -1 binary64)
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(*.f64 b b)
#s(literal -1/6 binary64)
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
Outputs
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 1))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 1))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (cos a)))
#s(approx (/ 1 (cos a)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b r)))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
Calls

9 calls:

TimeVariablePointExpression
7.0ms
r
@-inf
((/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) (cos b) (/ 1 (/ 1 (cos a))) 1 (/ 1 (cos a)) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
6.0ms
b
@-inf
((/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) (cos b) (/ 1 (/ 1 (cos a))) 1 (/ 1 (cos a)) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
5.0ms
b
@inf
((/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) (cos b) (/ 1 (/ 1 (cos a))) 1 (/ 1 (cos a)) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
5.0ms
r
@inf
((/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) (cos b) (/ 1 (/ 1 (cos a))) 1 (/ 1 (cos a)) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
5.0ms
r
@0
((/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) (cos b) (/ 1 (/ 1 (cos a))) 1 (/ 1 (cos a)) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))

rewrite242.0ms (5.1%)

Memory
-13.2MiB live, 166.4MiB allocated; 19ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08026278
08554924
146904922
081134706
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
243 → 503
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
#s(literal -1 binary64)
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(*.f64 b b)
#s(literal -1/6 binary64)
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 1))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 1))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (/ 1 (/ 1 (cos a))) #s(hole binary64 (cos a)))
#s(approx (/ 1 (cos a)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b r)))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
Outputs
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(/.f64 (*.f64 r #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
r
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (sin.f64 b) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b))))
(/.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(sin.f64 b)
(exp.f64 (-.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (+.f64 (neg.f64 b) a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal -1 binary64) (*.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 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (cos.f64 b) #s(literal 1 binary64))
(pow.f64 (pow.f64 (cos.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (cos.f64 b) #s(literal 1 binary64))
(/.f64 (cos.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64)))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (cos.f64 a) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 a))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) #s(literal -1 binary64))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a))) #s(literal -1 binary64)))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(literal 1 binary64)
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) #s(literal 1 binary64))
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal -1 binary64)))
(*.f64 (cos.f64 a) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 a))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) #s(literal -1 binary64))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a))) #s(literal -1 binary64)))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
a
(*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64))
(*.f64 (sin.f64 a) (neg.f64 (sin.f64 b)))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (+.f64 (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 a b)) (cos.f64 (+.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (PI.f64)) a)) (cos.f64 (+.f64 (+.f64 b (PI.f64)) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a (+.f64 b (PI.f64)))) (cos.f64 (+.f64 a (+.f64 b (PI.f64))))) #s(literal 2 binary64))
(neg.f64 (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 #s(literal -1 binary64) (sin.f64 b))
(*.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 b (neg.f64 (PI.f64)))) (sin.f64 (+.f64 b (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 b (PI.f64))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 b (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(neg.f64 (sin.f64 b))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (neg.f64 b))
(sin.f64 (+.f64 b (PI.f64)))
(fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(fma.f64 (sin.f64 b) #s(literal -1 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(*.f64 (sin.f64 a) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 a) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(sin.f64 a)
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)) r))
(*.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)) r)
(*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b)))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) b)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(/.f64 (*.f64 r #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (sin.f64 b) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b))))
(/.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(sin.f64 b)
(exp.f64 (-.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 b))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) #s(literal -1/2 binary64))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
#s(literal -1 binary64)
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (+.f64 (neg.f64 b) a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal -1 binary64) (*.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 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (neg.f64 b)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (-.f64 (*.f64 (*.f64 a a) a) (*.f64 (neg.f64 b) (*.f64 b b))) (fma.f64 a a (fma.f64 b b (*.f64 a (neg.f64 b)))))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(-.f64 a (neg.f64 b))
(+.f64 a b)
(+.f64 b a)
(*.f64 r (/.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
(*.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) r)
(*.f64 r #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)))
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(*.f64 b (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(+.f64 b (*.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) b))
(+.f64 b (*.f64 b (*.f64 (*.f64 b b) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (*.f64 (*.f64 b b) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (*.f64 (*.f64 b b) #s(literal -1/6 binary64)))) (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (*.f64 (*.f64 b b) #s(literal -1/6 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -1/6 binary64))))))
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64))
(fma.f64 b (*.f64 b #s(literal -1/6 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 1/6 binary64)))
(+.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -1/6 binary64)))
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 b) #s(literal 2 binary64))
(pow.f64 (neg.f64 b) #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
#s(literal -1/6 binary64)
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (+.f64 (neg.f64 b) a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal -1 binary64) (*.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 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.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 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 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 (neg.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.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 (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(/.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (sin.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (fma.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (/ 1 (/ 1 (cos a))) #s(literal 1 binary64))
#s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ 1 (cos a)) #s(literal 1 binary64))
#s(approx (/ 1 (cos a)) (fma.f64 #s(literal 1/2 binary64) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ 1 (cos a)) (fma.f64 (fma.f64 #s(literal 5/24 binary64) (*.f64 a a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ 1 (cos a)) (fma.f64 (fma.f64 (fma.f64 #s(literal 61/720 binary64) (*.f64 a a) #s(literal 5/24 binary64)) (*.f64 a a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ 1 (/ 1 (cos a))) #s(literal 1 binary64))
#s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 a) (sin.f64 b)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a a)) (sin.f64 b) (neg.f64 (sin.f64 b))) a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/120 binary64) (*.f64 (sin.f64 b) #s(literal 1/6 binary64))) (*.f64 a a) (neg.f64 (sin.f64 b))) a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 b) (*.f64 (fma.f64 #s(literal -1/120 binary64) (sin.f64 b) (*.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 a a)) (sin.f64 b))) (*.f64 a a))) (*.f64 a a) (neg.f64 (sin.f64 b))) a))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (/.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))))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (tan.f64 b) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (neg.f64 (/.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))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.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))))) #s(literal -1/2 binary64) (fma.f64 (/.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))))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (tan.f64 b) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b)))) a)) (fma.f64 #s(literal -1/2 binary64) (tan.f64 b) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.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))))))) a (tan.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.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 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.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 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (neg.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 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) (sin.f64 b) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal 1/120 binary64) (*.f64 (sin.f64 b) #s(literal -1/6 binary64))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (fma.f64 #s(literal 1/120 binary64) (sin.f64 b) (*.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 a a)) (sin.f64 b))) (*.f64 a a))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (/ 1 (/ 1 (cos a))) (cos.f64 a))
#s(approx (/ 1 (cos a)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (/ 1 (/ 1 (cos a))) (cos.f64 a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 b r))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (fma.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 b) (sin.f64 a)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (sin.f64 a) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/120 binary64) (*.f64 (sin.f64 a) #s(literal 1/6 binary64))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/5040 binary64) (*.f64 (sin.f64 a) #s(literal -1/120 binary64))) (*.f64 b b))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (neg (sin b)) (neg.f64 b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 #s(literal 0 binary64) r))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 (fma.f64 b (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)) r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) r) (fma.f64 #s(literal -1/3 binary64) (*.f64 #s(literal 0 binary64) r) (neg.f64 (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal 1 binary64))))) b) (neg.f64 (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)))) b r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+.f64 #s(literal 0 binary64) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) b #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 b r))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 #s(literal 1 binary64) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 b b) #s(literal 7/360 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) b)
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (+ (* (* b b) -1/6) 1) #s(literal 1 binary64))
#s(approx (+ (* (* b b) -1/6) 1) (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)))
#s(approx (* b b) (*.f64 b b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal -1/2 binary64) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (*.f64 (sin.f64 a) #s(literal -1/6 binary64))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (sin.f64 a) #s(literal -1/6 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 (sin.f64 a) #s(literal 1/120 binary64))) (*.f64 b b))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (neg (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (pow (sin b) -1) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 (*.f64 (*.f64 b b) b) #s(literal -1/6 binary64)))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 (*.f64 b b) b)))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 (*.f64 b b) #s(literal -1/6 binary64)))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 (*.f64 (neg.f64 b) (*.f64 b b)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 b b)))))

eval55.0ms (1.1%)

Memory
17.5MiB live, 116.3MiB allocated; 18ms collecting garbage
Compiler

Compiled 4 304 to 1 947 computations (54.8% saved)

prune67.0ms (1.4%)

Memory
-0.9MiB live, 137.5MiB allocated; 9ms collecting garbage
Pruning

76 alts after pruning (71 fresh and 5 done)

PrunedKeptTotal
New39522417
Fresh94958
Picked325
Done033
Total40776483
Accuracy
100.0%
Counts
483 → 76
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.4%
(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.5%
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
78.5%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
61.8%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
53.9%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
59.1%
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
40.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
32.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
53.9%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
39.2%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))) (cos.f64 (+.f64 a b)))
51.0%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
51.6%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))) (sin.f64 a))))
61.9%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)))))
51.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b))) #s(literal -1 binary64)))) (sin.f64 a))))
61.3%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos a)) (fma.f64 #s(literal 1/2 binary64) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
✓99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
79.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))
51.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
52.9%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
56.1%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b)) (sin.f64 a))))
58.9%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.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)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
99.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 b) (sin.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (*.f64 (sin.f64 b) (sin.f64 a))))
48.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64))))))
61.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
66.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
58.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
51.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
51.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
62.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
55.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
38.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
36.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
38.0%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
36.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
61.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64))) a))))
63.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a)) a))))
46.4%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
52.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
58.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.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) b))))) (-.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))))
33.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
37.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
31.4%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
49.7%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
50.1%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))))
49.7%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
49.8%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
50.1%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
50.0%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
50.0%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
50.8%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
33.3%
(/.f64 (*.f64 r #s(approx (sin b) b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
50.0%
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
61.7%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
38.4%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
38.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
✓78.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
63.1%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
✓61.8%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
50.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
61.9%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
50.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
32.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
50.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
✓34.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
31.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
61.5%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
31.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
✓17.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
33.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
32.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
31.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
Compiler

Compiled 2 546 to 1 891 computations (25.7% saved)

regimes148.0ms (3.1%)

Memory
10.0MiB live, 253.3MiB allocated; 53ms collecting garbage
Counts
119 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64))) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos a)) (fma.f64 #s(literal 1/2 binary64) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 b))) #s(literal -1 binary64)))) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.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) b))))) (-.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 a) (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)))) (*.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))))))
(/.f64 (*.f64 r (sin.f64 b)) (/.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)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 r (sin.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (*.f64 r (sin.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))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.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)))))))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
Calls

4 calls:

39.0ms
b
39.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
32.0ms
a
32.0ms
r
Results
AccuracySegmentsBranch
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 11 to 17 computations (-54.5% saved)

regimes171.0ms (3.6%)

Memory
-32.7MiB live, 153.2MiB allocated; 33ms collecting garbage
Counts
99 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64))) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos a)) (fma.f64 #s(literal 1/2 binary64) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
Outputs
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
Calls

4 calls:

49.0ms
b
45.0ms
a
31.0ms
r
23.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
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 11 to 17 computations (-54.5% saved)

regimes121.0ms (2.5%)

Memory
38.7MiB live, 227.3MiB allocated; 31ms collecting garbage
Counts
97 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64))) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (/ 1 (/ 1 (cos a))) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos a)) (fma.f64 #s(literal 1/2 binary64) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Calls

4 calls:

34.0ms
a
29.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
27.0ms
b
26.0ms
r
Results
AccuracySegmentsBranch
78.6%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
78.6%1r
78.6%1a
78.6%1b
Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes40.0ms (0.8%)

Memory
-3.0MiB live, 86.4MiB allocated; 11ms collecting garbage
Counts
31 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
Outputs
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
Calls

4 calls:

11.0ms
b
11.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
8.0ms
r
8.0ms
a
Results
AccuracySegmentsBranch
78.5%1a
78.5%1b
78.5%1r
78.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes87.0ms (1.8%)

Memory
-31.5MiB live, 67.2MiB allocated; 15ms collecting garbage
Counts
30 → 3
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
Calls

4 calls:

16.0ms
r
8.0ms
b
8.0ms
a
8.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
78.2%3b
78.2%3a
65.7%3(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
61.9%1r
Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes13.0ms (0.3%)

Memory
29.7MiB live, 29.7MiB allocated; 0ms collecting garbage
Counts
21 → 3
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
Calls

2 calls:

6.0ms
b
6.0ms
a
Results
AccuracySegmentsBranch
76.7%3a
78.2%3b
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes6.0ms (0.1%)

Memory
13.7MiB live, 13.7MiB allocated; 0ms collecting garbage
Counts
19 → 3
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) b (neg.f64 a)) b #s(literal 1 binary64)))))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
Calls

1 calls:

5.0ms
b
Results
AccuracySegmentsBranch
78.1%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes8.0ms (0.2%)

Memory
-33.0MiB live, 11.7MiB allocated; 5ms collecting garbage
Counts
12 → 3
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
Calls

1 calls:

7.0ms
b
Results
AccuracySegmentsBranch
78.1%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes13.0ms (0.3%)

Memory
33.8MiB live, 33.8MiB allocated; 0ms collecting garbage
Counts
10 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (/ 1 (/ 1 (cos a)))) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
Calls

4 calls:

3.0ms
b
3.0ms
a
3.0ms
r
3.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
61.9%1r
61.9%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
61.9%1a
61.9%1b
Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes11.0ms (0.2%)

Memory
-33.0MiB live, 11.7MiB allocated; 3ms collecting garbage
Counts
5 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r) b))
Calls

4 calls:

4.0ms
a
2.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
2.0ms
r
2.0ms
b
Results
AccuracySegmentsBranch
34.2%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
34.2%1a
34.2%1b
34.2%1r
Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes4.0ms (0.1%)

Memory
14.9MiB live, 14.9MiB allocated; 0ms collecting garbage
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
Calls

4 calls:

1.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
1.0ms
r
1.0ms
b
1.0ms
a
Results
AccuracySegmentsBranch
17.0%1r
17.0%1a
17.0%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
17.0%1b
Compiler

Compiled 11 to 17 computations (-54.5% saved)

bsearch77.0ms (1.6%)

Memory
6.2MiB live, 115.1MiB allocated; 25ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
44.0ms
810494731876.8159
3.1555391144995027e+31
30.0ms
-2799585498638.4756
-283.6997347338781
Samples
53.0ms260×1valid
7.0ms76×0valid
Compiler

Compiled 644 to 677 computations (-5.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 50.0ms
ival-sin: 21.0ms (41.6% of total)
ival-cos: 18.0ms (35.6% of total)
adjust: 5.0ms (9.9% of total)
ival-add!: 2.0ms (4% of total)
ival-div!: 2.0ms (4% of total)
ival-mult!: 2.0ms (4% of total)

bsearch47.0ms (1%)

Memory
-26.0MiB live, 64.1MiB allocated; 8ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
24.0ms
0.2157661787659124
810494731876.8159
20.0ms
-283.6997347338781
-0.02818707999480059
Samples
23.0ms144×1valid
10.0ms144×0valid
Compiler

Compiled 462 to 500 computations (-8.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-cos: 11.0ms (43.8% of total)
adjust: 5.0ms (19.9% of total)
ival-sin: 5.0ms (19.9% of total)
ival-div!: 2.0ms (8% of total)
ival-add!: 1.0ms (4% of total)
ival-mult!: 1.0ms (4% of total)

bsearch20.0ms (0.4%)

Memory
37.6MiB live, 37.6MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
18.0ms
7.825880725207373e-21
1.4083466199453038e-13
1.0ms
-2799585498638.4756
-283.6997347338781
Samples
8.0ms68×1valid
4.0ms76×0valid
Compiler

Compiled 430 to 470 computations (-9.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-cos: 3.0ms (34% of total)
ival-sin: 2.0ms (22.7% of total)
adjust: 1.0ms (11.3% of total)
ival-add!: 1.0ms (11.3% of total)
ival-div!: 1.0ms (11.3% of total)
ival-mult!: 1.0ms (11.3% of total)

bsearch2.0ms (0%)

Memory
2.4MiB live, 2.4MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
7.825880725207373e-21
1.4083466199453038e-13
1.0ms
-2799585498638.4756
-283.6997347338781
Compiler

Compiled 715 to 755 computations (-5.6% saved)

derivations411.0ms (8.6%)

Memory
-14.5MiB live, 369.4MiB allocated; 28ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 155 to 107 computations (31% saved)

preprocess175.0ms (3.6%)

Memory
-8.1MiB live, 225.5MiB allocated; 20ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 625 to 543 computations (13.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...