Metrics for rsin A (should all be same)

start0.0ms (0%)

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

analyze199.0ms (6.2%)

Memory

-0.9MiB live, 69.5MiB allocated; 3ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
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.1s (34.3%)

Memory

6.1MiB live, 284.4MiB allocated; 29ms collecting garbage

Samples

741.0ms	5 947×	1	valid
113.0ms	2 309×	0	valid

Precisions

Click to see histograms. Total time spent on operations: 647.0ms

ival-cos: 234.0ms (36.2% of total)

ival-sin: 172.0ms (26.6% of total)

adjust: 113.0ms (17.5% of total)

ival-div!: 52.0ms (8% of total)

ival-mult!: 41.0ms (6.3% of total)

ival-add!: 35.0ms (5.4% of total)

Bogosity

preprocess36.0ms (1.1%)

Memory

3.4MiB live, 3.4MiB allocated; 0ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	38	97
1	103	97
2	251	97
3	573	97
4	1013	97
5	2045	97
6	4337	97

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	76.7%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))

Symmetry

(negabs r)

Compiler

Compiled 16 to 16 computations (0% saved)

series19.0ms (0.6%)

Memory

-0.6MiB live, 7.0MiB allocated; 1ms 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:

Time	Variable		Point	Expression
5.0ms	a	@	inf	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
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	@	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)
2.0ms	a	@	0	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)

rewrite155.0ms (4.8%)

Memory

4.7MiB live, 55.2MiB allocated; 11ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	228	937
0	235	901
1	1325	845
0	8049	811

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: -1.1MiB live, 6.3MiB allocated; 0ms collecting garbage
Compiler: Compiled 777 to 369 computations (52.5% saved)

prune13.0ms (0.4%)

Memory

1.9MiB live, 9.8MiB allocated; 0ms collecting garbage

Pruning

24 alts after pruning (24 fresh and 0 done)

	Pruned	Kept	Total
New	46	24	70
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	47	24	71

Accuracy

99.7%

Counts

71 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	76.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
	76.6%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	36.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)))
	76.5%	(/.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.3%	(/.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.2%	(/.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.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	39.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	39.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	50.4%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
	65.5%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
	64.2%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	57.1%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	57.7%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
	56.1%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	54.6%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	54.6%	(/.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))))
▶	54.1%	(/.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))))
	53.5%	(/.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)))
	53.8%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
	76.7%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	53.6%	#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))
▶	57.2%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	53.5%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))

Compiler

Compiled 696 to 614 computations (11.8% saved)

series50.0ms (1.6%)

Memory

-3.9MiB live, 27.0MiB allocated; 4ms collecting garbage

Counts

33 → 195

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 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 b a)))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 b a))
(-.f64 (.f64 b b) (.f64 a a))
(*.f64 b b)
(*.f64 a a)
(-.f64 b 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))))
#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)))
(fma.f64 a (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))
(-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))
(.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64))
(*.f64 (cos.f64 b) a)
#s(literal -1/2 binary64)

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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (- b 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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 b))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (+ a b)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (- b a) #s(hole binary64 b))
#s(approx (- b a) #s(hole binary64 (+ b (* -1 a))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (- (* -1/2 (* a (cos b))) (sin b))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (* (cos b) a) #s(hole binary64 (* a (cos b))))
#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 (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (- b a)))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 a))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (- b a) #s(hole binary64 (* -1 a)))
#s(approx (- b a) #s(hole binary64 (* a (- (/ b a) 1))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* a (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (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 (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a)))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a))))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- b a) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ b a)))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (* a (+ (* 1/2 (cos b)) (/ (sin b) 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 (* 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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (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) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #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 (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 b) (* a a)) (- b a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (- b a) #s(hole binary64 (- b a)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (+ (* 1/6 (* a b)) (* 1/4 (pow a 2))) 1/2))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* b (+ (* 1/6 b) (* 1/4 a))) 1)))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 a)))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* 1/4 (* a (pow b 2))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* -1/48 (* a (pow b 2))) (* 1/4 a))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* 1/4 a) (* (pow b 2) (+ (* -1/48 a) (* 1/1440 (* a (pow b 2))))))))))
#s(approx (* (cos b) a) #s(hole binary64 a))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 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 b) (* a a)) (- b a)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (- b a) #s(hole binary64 (* b (+ 1 (* -1 (/ a b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (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 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b))))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b)))))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (- b a) #s(hole binary64 (* -1 (* b (- (/ a b) 1)))))

Calls

9 calls:

Time	Variable		Point	Expression
7.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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b a))) (/ (- (* b b) (* a a)) (- b a)) (- (* b b) (* a a)) (* b b) (* a a) (- b a) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
6.0ms	a	@	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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b a))) (/ (- (* b b) (* a a)) (- b a)) (- (* b b) (* a a)) (* b b) (* a a) (- b a) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
6.0ms	b	@	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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b a))) (/ (- (* b b) (* a a)) (- b a)) (- (* b b) (* a a)) (* b b) (* a a) (- b a) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
5.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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b a))) (/ (- (* b b) (* a a)) (- b a)) (- (* b b) (* a a)) (* b b) (* a a) (- b a) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
5.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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b a))) (/ (- (* b b) (* a a)) (- b a)) (- (* b b) (* a a)) (* b b) (* a a) (- b a) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)

rewrite171.0ms (5.3%)

Memory

-0.3MiB live, 52.1MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	690	5149
0	740	4734
1	3800	4668
0	8880	4487

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

228 → 420

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 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 b a)))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 b a))
(-.f64 (.f64 b b) (.f64 a a))
(*.f64 b b)
(*.f64 a a)
(-.f64 b 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))))
#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)))
(fma.f64 a (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))
(-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))
(.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64))
(*.f64 (cos.f64 b) a)
#s(literal -1/2 binary64)
#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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (- b 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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 b))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (+ a b)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (- b a) #s(hole binary64 b))
#s(approx (- b a) #s(hole binary64 (+ b (* -1 a))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (- (* -1/2 (* a (cos b))) (sin b))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (* (cos b) a) #s(hole binary64 (* a (cos b))))
#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 (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (- b a)))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 a))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (- b a) #s(hole binary64 (* -1 a)))
#s(approx (- b a) #s(hole binary64 (* a (- (/ b a) 1))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* a (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (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 (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a)))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a))))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- b a) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ b a)))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (* a (+ (* 1/2 (cos b)) (/ (sin b) 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 (* 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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (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) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #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 (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 b) (* a a)) (- b a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (- b a) #s(hole binary64 (- b a)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (+ (* 1/6 (* a b)) (* 1/4 (pow a 2))) 1/2))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* b (+ (* 1/6 b) (* 1/4 a))) 1)))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 a)))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* 1/4 (* a (pow b 2))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* -1/48 (* a (pow b 2))) (* 1/4 a))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* 1/4 a) (* (pow b 2) (+ (* -1/48 a) (* 1/1440 (* a (pow b 2))))))))))
#s(approx (* (cos b) a) #s(hole binary64 a))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 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 b) (* a a)) (- b a)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (- b a) #s(hole binary64 (* b (+ 1 (* -1 (/ a b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (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 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b))))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b)))))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (- b a) #s(hole binary64 (* -1 (* b (- (/ a b) 1)))))

Outputs
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.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
(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 (neg.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)))) (neg.f64 (cos.f64 (-.f64 a b))))
(/.f64 (neg.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)))) (neg.f64 (+.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 (.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (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 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 (neg.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b)))) #s(literal -2 binary64))
(/.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 (neg.f64 b) a)) (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 (neg.f64 a) b)) (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))
(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) (pow.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 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.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 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (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 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.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))
(/.f64 (neg.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)))) (neg.f64 (cos.f64 (-.f64 a b))))
(/.f64 (neg.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)))) (neg.f64 (+.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 (.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (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 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 (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 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 a b)
(+.f64 b a)
(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))))))
(/.f64 (neg.f64 (.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
(/.f64 (.f64 (sin.f64 b) r) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))))
(sin.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (/.f64 (.f64 b b) (-.f64 b a))) (cos.f64 (/.f64 (.f64 a a) (-.f64 b a))) (.f64 (sin.f64 (/.f64 (.f64 b b) (-.f64 b a))) (sin.f64 (/.f64 (*.f64 a a) (-.f64 b a)))))
(fma.f64 (sin.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
(cos.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))))
(cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 b b) (-.f64 b a))) (cos.f64 (/.f64 (.f64 a a) (-.f64 b a)))) (.f64 (sin.f64 (/.f64 (.f64 b b) (-.f64 b a))) (sin.f64 (/.f64 (.f64 a a) (-.f64 b a)))))
(+.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (neg.f64 (-.f64 b a))))
(/.f64 (-.f64 (.f64 (.f64 b b) (-.f64 b a)) (.f64 (-.f64 b a) (.f64 a a))) (*.f64 (-.f64 b a) (-.f64 b a)))
(/.f64 (neg.f64 (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (-.f64 b a)))
(/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))
(-.f64 (/.f64 (.f64 b b) (-.f64 b a)) (/.f64 (.f64 a a) (-.f64 b a)))
(*.f64 (+.f64 a b) (-.f64 b a))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 b b) (.f64 b b)) (.f64 (.f64 a a) (.f64 a a)))) (neg.f64 (fma.f64 b b (*.f64 a a))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 b b) b) (.f64 (.f64 b b) b)) (.f64 (.f64 (.f64 a a) a) (.f64 (.f64 a a) a)))) (neg.f64 (fma.f64 (.f64 b b) (.f64 b b) (fma.f64 (.f64 a a) (.f64 a a) (.f64 (.f64 b b) (*.f64 a a))))))
(/.f64 (.f64 (-.f64 (.f64 a a) (.f64 b b)) (-.f64 (.f64 (.f64 b b) b) (.f64 (.f64 a a) a))) (.f64 (-.f64 a b) (fma.f64 b b (fma.f64 a a (*.f64 a b)))))
(/.f64 (.f64 (-.f64 (.f64 a a) (.f64 b b)) (.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (-.f64 a b) (+.f64 a b)))
(/.f64 (.f64 (fma.f64 (.f64 a a) a (.f64 (.f64 b b) b)) (-.f64 (.f64 (.f64 b b) b) (.f64 (.f64 a a) a))) (.f64 (fma.f64 a a (-.f64 (.f64 b b) (.f64 a b))) (fma.f64 b b (fma.f64 a a (.f64 a b)))))
(/.f64 (.f64 (fma.f64 (.f64 a a) a (.f64 (.f64 b b) b)) (.f64 (+.f64 a b) (-.f64 b a))) (.f64 (fma.f64 a a (-.f64 (.f64 b b) (.f64 a b))) (+.f64 a b)))
(/.f64 (-.f64 (.f64 (.f64 b b) (.f64 b b)) (.f64 (.f64 a a) (.f64 a a))) (fma.f64 b b (*.f64 a a)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 b b) b) (.f64 (.f64 b b) b)) (.f64 (.f64 (.f64 a a) a) (.f64 (.f64 a a) a))) (fma.f64 (.f64 b b) (.f64 b b) (fma.f64 (.f64 a a) (.f64 a a) (.f64 (.f64 b b) (*.f64 a a)))))
(fma.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (*.f64 (neg.f64 a) a))
(fma.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (*.f64 (neg.f64 a) a))
(fma.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)) (*.f64 (neg.f64 a) a))
(fma.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (*.f64 (neg.f64 a) a))
(fma.f64 (fabs.f64 b) (fabs.f64 b) (*.f64 (neg.f64 a) a))
(fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 (neg.f64 a) a))
(fma.f64 b b (*.f64 (neg.f64 a) a))
(-.f64 (.f64 b b) (.f64 a a))
(+.f64 (.f64 b b) (.f64 (neg.f64 a) a))
(*.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)))
(*.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)))
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(*.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.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))
(fabs.f64 (*.f64 b b))
(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))))
(*.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a)))
(*.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a)))
(*.f64 (exp.f64 (log.f64 a)) (exp.f64 (log.f64 a)))
(*.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a)))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 (exp.f64 (log.f64 a)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a) #s(literal 2 binary64))
(pow.f64 (neg.f64 a) #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 a #s(literal 2 binary64))
(fabs.f64 (*.f64 a a))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 a) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 a) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 b b) b) (.f64 (.f64 a a) a))) (neg.f64 (fma.f64 b b (fma.f64 a a (*.f64 a b)))))
(/.f64 (-.f64 (.f64 (.f64 b b) b) (.f64 (.f64 a a) a)) (fma.f64 b b (fma.f64 a a (*.f64 a b))))
(/.f64 (neg.f64 (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (+.f64 a b)))
(/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (+.f64 a b))
(-.f64 b a)
(.f64 r (/.f64 (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 (neg.f64 (neg.f64 (.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 #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 (neg.f64 (.f64 (sin.f64 b) r)) (neg.f64 #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 (sin.f64 b) r) #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 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
(/.f64 (neg.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 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b)))))) (neg.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #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 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #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 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b)))) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64))) (-.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a)))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #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 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))
(/.f64 (+.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #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 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a)))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #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 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))))
(fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))
(fma.f64 a (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))
(-.f64 (cos.f64 b) (.f64 (neg.f64 a) (-.f64 (.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))))
(+.f64 (.f64 (-.f64 (.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b))
(+.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b)))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64) (sin.f64 b))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 b) a) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) #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 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b))))) (fma.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64) (sin.f64 b)))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 b) a) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) #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 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)))))
(-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))
(.f64 (.f64 #s(literal -1/2 binary64) a) (cos.f64 b))
(.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64))
(.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) a))
(.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) a))
(*.f64 (cos.f64 b) a)
(*.f64 a (cos.f64 b))
#s(literal -1/2 binary64)
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.f64 (sin.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (+ a b))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (/ (* (sin b) r) (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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (+ 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 (cos.f64 b) #s(literal -1/2 binary64))) 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 (cos.f64 b) #s(literal -1/2 binary64))) (.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 (cos.f64 b) #s(literal -1/2 binary64))) (.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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (+ a b))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (/ (* (sin b) r) (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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (+ a b))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (/ (* (sin b) r) (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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (+ 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 (cos.f64 b) #s(literal -1/2 binary64))) 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 b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 b) (* a a)) (- b 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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 b) (* a a)) (- b a))) (cos.f64 b))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (fma.f64 a (-.f64 (.f64 (fma.f64 (.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 (cos.f64 b) #s(literal -1/2 binary64))) a) (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (- (* b b) (* a a)) (- b a)) b)
#s(approx (/ (- (* b b) (* a a)) (- b a)) (+.f64 a b))
#s(approx (- (* b b) (* a a)) (*.f64 b b))
#s(approx (- (* b b) (* a a)) (fma.f64 b b (neg.f64 (*.f64 a a))))
#s(approx (* a a) (*.f64 a a))
#s(approx (- b a) b)
#s(approx (- b a) (+.f64 (neg.f64 a) b))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (cos.f64 b))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (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) a) -1/2) (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)))
#s(approx (* (* (cos b) a) -1/2) (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)))
#s(approx (* (cos b) a) (*.f64 (cos.f64 b) a))
#s(approx (cos (+ a b)) (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 (+ 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 (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) a)
#s(approx (/ (- (* b b) (* a a)) (- b a)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (- (* b b) (* a a)) (neg.f64 (*.f64 a a)))
#s(approx (- (* b b) (* a a)) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 a a)) #s(literal 1 binary64)) (.f64 a a)))
#s(approx (- b a) (neg.f64 a))
#s(approx (- b a) (*.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (neg.f64 (sin.f64 b)) a)) (.f64 a a)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (-.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (cos.f64 b) (.f64 a a))) (/.f64 (sin.f64 b) a)) (*.f64 a a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (neg.f64 (sin.f64 b)) a)) a))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* (sin b) r) (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 (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (- b a) (*.f64 (neg.f64 a) (+.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (cos.f64 b) a)) (sin.f64 b)) a))) (.f64 a a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 (neg.f64 a) (fma.f64 (cos.f64 b) #s(literal 1/2 binary64) (/.f64 (sin.f64 b) a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* (sin b) r) (.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 (* (sin b) r) (.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 #s(literal -1/6 binary64) (.f64 b b) #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 (* (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 #s(literal 1/24 binary64) (.f64 b b)) (cos.f64 a) (.f64 (cos.f64 a) #s(literal -1/2 binary64))) (.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 b b)) (cos.f64 a) (.f64 #s(literal 1/24 binary64) (cos.f64 a))) (.f64 b b) (.f64 (cos.f64 a) #s(literal -1/2 binary64))) (.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 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 b b) #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (/ (* (sin b) r) (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 (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* (sin b) r) (.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 (* (sin b) r) (.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 (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 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b 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 (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 a))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (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 (- (* b b) (* a a)) (*.f64 (+.f64 a b) (-.f64 b a)))
#s(approx (* b b) (*.f64 b b))
#s(approx (- b a) (-.f64 b a))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (+.f64 (fma.f64 (neg.f64 a) b (.f64 (.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (+.f64 (fma.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 a a)) #s(literal 1/2 binary64)) b (neg.f64 a)) b (.f64 (.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (+.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 a a) (.f64 (.f64 a b) #s(literal 1/6 binary64))) #s(literal 1/2 binary64)) b (neg.f64 a)) b (.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 #s(literal -1/2 binary64) a (neg.f64 b)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 a b)) #s(literal 1 binary64)) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) a (.f64 #s(literal 1/6 binary64) b)) b) #s(literal 1 binary64)) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (* (cos b) a) -1/2) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (* (* (cos b) a) -1/2) (fma.f64 (.f64 (.f64 b b) a) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (* (cos b) a) -1/2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/48 binary64) (.f64 (.f64 b b) a) (.f64 #s(literal 1/4 binary64) a)) (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (* (cos b) a) -1/2) (fma.f64 (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/1440 binary64) (.f64 (.f64 b b) a) (.f64 #s(literal -1/48 binary64) a)) (.f64 #s(literal 1/4 binary64) a)) (.f64 b b) (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (cos b) a) a)
#s(approx (* (cos b) a) (fma.f64 (.f64 (.f64 b b) a) #s(literal -1/2 binary64) a))
#s(approx (* (cos b) a) (fma.f64 (fma.f64 (.f64 (.f64 b b) a) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) a)) (.f64 b b) a))
#s(approx (* (cos b) a) (fma.f64 (fma.f64 (.f64 b b) (fma.f64 (.f64 (.f64 b b) a) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) a)) (.f64 #s(literal -1/2 binary64) a)) (.f64 b b) 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 b) (* a a)) (- b a)) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (- (* b b) (* a a)) (.f64 (+.f64 (/.f64 (neg.f64 (.f64 a a)) (.f64 b b)) #s(literal 1 binary64)) (.f64 b b)))
#s(approx (- b a) (*.f64 (+.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)) b))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 a (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (/ (* (sin b) r) (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))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (+.f64 (neg.f64 b) a)))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (+.f64 (neg.f64 b) a))))
#s(approx (/ (- (* b b) (* a a)) (- b a)) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (- b a) (*.f64 (neg.f64 b) (-.f64 (/.f64 a b) #s(literal 1 binary64))))

eval40.0ms (1.2%)

Memory: 2.0MiB live, 31.6MiB allocated; 4ms collecting garbage
Compiler: Compiled 4 664 to 1 858 computations (60.2% saved)

prune42.0ms (1.3%)

Memory

-6.0MiB live, 31.0MiB allocated; 3ms collecting garbage

Pruning

56 alts after pruning (56 fresh and 0 done)

	Pruned	Kept	Total
New	338	49	387
Fresh	12	7	19
Picked	5	0	5
Done	0	0	0
Total	355	56	411

Accuracy

99.8%

Counts

411 → 56

Alt Table

Click to see full alt table

Status	Accuracy	Program
	76.6%	(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) r) (cos.f64 (+.f64 a b)))
	99.4%	(/.f64 (.f64 (sin.f64 b) r) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	65.5%	(/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
	64.2%	(/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	57.1%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
	57.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
	54.1%	(/.f64 (.f64 (sin.f64 b) r) #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))))
	53.5%	(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
	53.8%	(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a 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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a))))
	36.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)))
	76.5%	(/.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)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.3%	(/.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.3%	(/.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.2%	(/.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 (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 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	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))))
	57.5%	(/.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)))))
	63.0%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	54.3%	(/.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))))
	58.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	59.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	39.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	32.0%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	39.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	20.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64)) (.f64 a a)) (-.f64 b a))))
	47.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) #s(approx (- b a) (.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
	37.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) #s(approx (- b a) b))))
	20.2%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (-.f64 b a))))
	46.2%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (*.f64 b b)) (-.f64 b a))))
	42.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (neg.f64 (*.f64 a a))) (-.f64 b a))))
	56.1%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
▶	54.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
▶	53.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))))
	50.1%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #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 (-.f64 (.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
	31.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (cos.f64 b) a)) (sin.f64 b)) a))) (.f64 a a)))))
	10.4%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))))
	53.8%	(/.f64 (.f64 r #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (sin.f64 a))))
	53.9%	(/.f64 (.f64 r #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (sin.f64 a))))
	54.7%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
	56.9%	(/.f64 (.f64 r #s(approx (sin b) b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
	76.7%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
	50.4%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
	76.7%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	53.6%	#s(approx (/ (* (sin b) r) (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))
	57.2%	#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
	53.5%	#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
▶	28.0%	#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)))))))
	57.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
	33.5%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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))))
	33.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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))))
▶	34.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
	33.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))

Compiler

Compiled 1 992 to 1 752 computations (12% saved)

series53.0ms (1.7%)

Memory

8.1MiB live, 31.0MiB allocated; 1ms collecting garbage

Counts

35 → 171

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 r #s(approx (tan b) b)))
(*.f64 r #s(approx (tan b) b))
#s(approx (tan b) b)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))))
#s(approx (cos (+ a b)) (fma.f64 a #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b)))
(fma.f64 a #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a))
(*.f64 #s(literal -1/2 binary64) a)
#s(literal -1/2 binary64)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (- b a))))))
#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 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 (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 (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (- (* -1/2 (* a (cos b))) (sin b))))
#s(approx (* -1/2 a) #s(hole binary64 (* -1/2 a)))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* a (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (- b a)))))
#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 (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (* a (+ (* 1/2 (cos b)) (/ (sin b) a))))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a)))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a))))))
#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 (* 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 (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (+ (* 1/6 (* a b)) (* 1/4 (pow a 2))) 1/2))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* b (+ (* 1/6 b) (* 1/4 a))) 1)))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (- 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 (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (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 (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#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 (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b))))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b)))))))

Calls

9 calls:

Time	Variable		Point	Expression
12.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))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* -1/2 a) -1/2 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b 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))))
6.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))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* -1/2 a) -1/2 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b 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))))
6.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))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* -1/2 a) -1/2 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b 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))))
6.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))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* -1/2 a) -1/2 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b 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))))
6.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))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* -1/2 a) -1/2 (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (cos (/ (- (* b b) (* a a)) (- b 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))))

rewrite154.0ms (4.8%)

Memory

-1.2MiB live, 43.9MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	737	5028
0	785	4110
1	4558	4059
0	8200	3877

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

206 → 362

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 r #s(approx (tan b) b)))
(*.f64 r #s(approx (tan b) b))
#s(approx (tan b) b)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))))
#s(approx (cos (+ a b)) (fma.f64 a #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b)))
(fma.f64 a #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a))
(*.f64 #s(literal -1/2 binary64) a)
#s(literal -1/2 binary64)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (- b a))))))
#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 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 (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 (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (- (* -1/2 (* a (cos b))) (sin b))))
#s(approx (* -1/2 a) #s(hole binary64 (* -1/2 a)))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* a (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (- b a)))))
#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 (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (* a (+ (* 1/2 (cos b)) (/ (sin b) a))))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a)))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a))))))
#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 (* 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 (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (+ (* 1/6 (* a b)) (* 1/4 (pow a 2))) 1/2))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* b (+ (* 1/6 b) (* 1/4 a))) 1)))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (- 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 (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (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 (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#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 (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b))))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b)))))))

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
(*.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 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 a b)))
(/.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 (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 (+.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 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 #s(literal -1 binary64) (.f64 (sin.f64 a) (sin.f64 b)) (.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)))
(-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (neg.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)))
(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 a) (cos.f64 b)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.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 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #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) (pow.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 (+.f64 b (PI.f64)) a)) (cos.f64 (+.f64 (+.f64 b (PI.f64)) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #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) (cos a)) (* (neg (sin b)) (sin a)))) (.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 ( (tan b) (tan (PI))))) b) r))
(.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 ( (tan b) (tan (PI))))) b) r)
(.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 ( (tan b) (tan (PI))))) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b)
(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (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 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b)))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b))))) (-.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b)))) (.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b)))))
(fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b))
(fma.f64 (cos.f64 b) #s(literal 1 binary64) (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a))
(fma.f64 a #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))
(+.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b))
(+.f64 (cos.f64 b) (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a))
(*.f64 #s(literal -1/2 binary64) a)
(*.f64 a #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (/ (- ( b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.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 (+.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 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 (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))))))
(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 (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.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) (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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (cos.f64 b))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (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) a) -1/2) (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)))
#s(approx (* -1/2 a) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 b) (* a a)) (- b 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 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) a)) (fma.f64 (.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 b) (* a a)) (- b a))) (cos.f64 b))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (neg.f64 (sin.f64 b)) a)) (.f64 a a)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (-.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (cos.f64 b) (.f64 a a))) (/.f64 (sin.f64 b) a)) (*.f64 a a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (neg.f64 (sin.f64 b)) a)) a))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))))
#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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (cos.f64 b) a)) (sin.f64 b)) a))) (.f64 a a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 (neg.f64 a) (fma.f64 (cos.f64 b) #s(literal 1/2 binary64) (/.f64 (sin.f64 b) a))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (-.f64 b (neg.f64 a))))
#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) (+.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) (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) (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 (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 #s(literal -1/6 binary64) (.f64 b b) #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 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 (cos.f64 a) #s(literal -1/2 binary64))) 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 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 b b) #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 #s(literal 1/6 binary64) (*.f64 b b)) (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 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 b b) #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 #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 (/ (* 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) (+.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) (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) (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 b r))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.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) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.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) (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 (+ (* (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 (cos.f64 a) #s(literal -1/2 binary64))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (+.f64 (fma.f64 (neg.f64 a) b (.f64 (.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (+.f64 (fma.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 a a)) #s(literal 1/2 binary64)) b (neg.f64 a)) b (.f64 (.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (+.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 a a) (.f64 (.f64 a b) #s(literal 1/6 binary64))) #s(literal 1/2 binary64)) b (neg.f64 a)) b (.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 #s(literal -1/2 binary64) a (neg.f64 b)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 a b)) #s(literal 1 binary64)) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) a (.f64 #s(literal 1/6 binary64) b)) b) #s(literal 1 binary64)) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 b) (* a a)) (- b 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 (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 a))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (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 (+ (* (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 (- 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 #s(literal 0 binary64) (*.f64 b b)) #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 #s(literal 0 binary64) (.f64 b b)) #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 #s(literal 0 binary64) (*.f64 b b)) #s(literal 1/3 binary64) #s(literal 0 binary64)) b))
#s(approx (* (tan b) (tan (PI))) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 0 binary64) (.f64 b b)) #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 #s(literal 0 binary64) (.f64 b b)) #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 (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (+ (* a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 a (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 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 (- 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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 a b)))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 a b))))

eval41.0ms (1.3%)

Memory: 1.7MiB live, 32.3MiB allocated; 4ms collecting garbage
Compiler: Compiled 4 453 to 1 630 computations (63.4% saved)

prune47.0ms (1.5%)

Memory

-1.5MiB live, 33.9MiB allocated; 2ms collecting garbage

Pruning

66 alts after pruning (64 fresh and 2 done)

	Pruned	Kept	Total
New	351	25	376
Fresh	12	39	51
Picked	3	2	5
Done	0	0	0
Total	366	66	432

Accuracy

99.8%

Counts

432 → 66

Alt Table

Click to see full alt table

Status	Accuracy	Program
	76.6%	(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) r) (cos.f64 (+.f64 a b)))
	99.4%	(/.f64 (.f64 (sin.f64 b) r) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	65.5%	(/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
	64.2%	(/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	57.1%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
	57.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
	53.6%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b))))
▶	54.6%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	54.1%	(/.f64 (.f64 (sin.f64 b) r) #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))))
	53.5%	(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
	53.8%	(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a 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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a))))
	36.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.3%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (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 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
▶	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
	77.8%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (sin.f64 (+.f64 b (PI.f64))) (sin.f64 a))))
✓	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	78.7%	(/.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))))
	56.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 #s(literal -1/120 binary64) (.f64 b b) #s(literal 1/6 binary64)) (.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
	99.3%	(/.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.2%	(/.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 (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 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	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))))
	57.5%	(/.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)))))
	63.0%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	54.3%	(/.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))))
	58.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	59.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	39.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
	32.0%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	39.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	20.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64)) (.f64 a a)) (-.f64 b a))))
	47.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) #s(approx (- b a) (.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
	37.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) #s(approx (- b a) b))))
	20.2%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (-.f64 b a))))
	42.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (neg.f64 (*.f64 a a))) (-.f64 b a))))
	56.1%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	10.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
	38.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) #s(approx (cos b) #s(literal 1 binary64)))))
	49.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b))))) (-.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b)))))
	10.4%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))))
▶	53.9%	(/.f64 (.f64 r #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))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
	53.9%	(/.f64 (.f64 r #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (sin.f64 a))))
	54.7%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (sin.f64 a))))
	54.7%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
	56.9%	(/.f64 (.f64 r #s(approx (sin b) b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
	56.9%	(/.f64 (.f64 r #s(approx (sin b) b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
	33.3%	(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
	76.7%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
	50.4%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
▶	76.7%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	53.6%	#s(approx (/ (* (sin b) r) (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))
	57.2%	#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
	53.5%	#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
	28.3%	#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)))))
	56.9%	#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)))))))
	57.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
	27.9%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (PI.f64))))))
	33.5%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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))))
	33.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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))))
▶	14.8%	#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))))
✓	34.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
	33.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))

Compiler

Compiled 2 387 to 2 126 computations (10.9% saved)

series43.0ms (1.3%)

Memory

-0.5MiB live, 31.0MiB allocated; 1ms collecting garbage

Counts

39 → 205

Calls

Call 1

Inputs
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 a)
a
(neg.f64 (sin.f64 b))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
(cos.f64 b)
#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 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(*.f64 (sin.f64 b) r)
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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)
(/.f64 (.f64 r #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))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
(.f64 r #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 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) 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)
(fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64))
(-.f64 (.f64 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64))
(.f64 #s(literal 1/120 binary64) (.f64 b b))
#s(literal 1/120 binary64)
(*.f64 b b)
#s(literal 1/6 binary64)
#s(literal 1 binary64)
(fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a)))
(.f64 (neg.f64 #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))) (sin.f64 a))
(neg.f64 #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)))

Outputs
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (- b a))))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (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 a #s(hole binary64 a))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #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 (/ (* 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* 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 (* (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) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos 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 b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (- b a)))))
#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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a)))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* -1 (* a (+ (sin b) (* -1 (/ (cos b) a)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (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 (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #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 (/ (* 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #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 (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (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 (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* 1/120 (* b b)) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#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 (* (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 (sin b) #s(hole binary64 (sin b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (cos b) #s(hole binary64 (cos 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/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* (pow b 2) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b))))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b)))))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) (+ 1/120 (/ 1 (pow b 4))))))))

Calls

9 calls:

Time	Variable		Point	Expression
6.0ms	r	@	-inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* 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) (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (* b b) 1/6 1 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (* (neg (sin b)) (sin a)) (neg (sin b)))
6.0ms	b	@	-inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* 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) (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (* b b) 1/6 1 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (* (neg (sin b)) (sin a)) (neg (sin b)))
5.0ms	b	@	inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* 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) (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (* b b) 1/6 1 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (* (neg (sin b)) (sin a)) (neg (sin b)))
5.0ms	r	@	inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* 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) (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (* b b) 1/6 1 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (* (neg (sin b)) (sin a)) (neg (sin b)))
5.0ms	r	@	0	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* 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) (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a))) (+ (* (neg a) (sin b)) (cos b)) (neg a) (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (* b b) 1/6 1 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (* (neg (sin b)) (sin a)) (neg (sin b)))

rewrite160.0ms (5%)

Memory

6.0MiB live, 47.9MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	789	6594
0	842	5379
1	4533	5373
0	8288	5173

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

244 → 429

Calls

Call 1

Inputs
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 a)
a
(neg.f64 (sin.f64 b))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
(cos.f64 b)
#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 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(*.f64 (sin.f64 b) r)
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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)
(/.f64 (.f64 r #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))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
(.f64 r #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 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) 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)
(fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64))
(-.f64 (.f64 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64))
(.f64 #s(literal 1/120 binary64) (.f64 b b))
#s(literal 1/120 binary64)
(*.f64 b b)
#s(literal 1/6 binary64)
#s(literal 1 binary64)
(fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a)))
(.f64 (neg.f64 #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))) (sin.f64 a))
(neg.f64 #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 (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (- b a))))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (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 a #s(hole binary64 a))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #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 (/ (* 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b a))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* 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 (* (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) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos 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 b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (- b a)))))
#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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a)))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (/ (- (pow b 2) (pow a 2)) (+ b (* -1 a))))))
#s(approx (+ (* (neg a) (sin b)) (cos b)) #s(hole binary64 (* -1 (* a (+ (sin b) (* -1 (/ (cos b) a)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (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 (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #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 (/ (* 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #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 (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 (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 (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* 1/120 (* b b)) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#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 (* (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 (sin b) #s(hole binary64 (sin b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (cos b) #s(hole binary64 (cos 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/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* (pow b 2) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b))))))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) #s(hole binary64 (cos (* -1 (/ (- (pow b 2) (pow a 2)) (+ a (* -1 b)))))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) (+ 1/120 (/ 1 (pow b 4))))))))

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 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.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 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))))))
(/.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))))))
(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 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 (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)))
a
(*.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 (cos.f64 b) (cos.f64 a))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.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 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 (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 (+.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 (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 a) b)) (cos.f64 (-.f64 b (neg.f64 a)))) #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 b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #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 (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)))))
(*.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)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (.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 (+.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 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.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 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))))))
(/.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))))))
(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 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 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 (sin.f64 b) (/.f64 r #s(approx (cos (/ (- ( b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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)
(.f64 r (/.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)) (-.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 (neg.f64 (.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)) r)) (neg.f64 (-.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 #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)) r) (-.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 #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)) r)
(.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)))
#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 (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 b (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)))
(+.f64 b (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) b))
(+.f64 b (.f64 b (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 1 binary64)))))
(fma.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64))
(fma.f64 (.f64 b b) (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 b b)) (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))))
(+.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b))
(/.f64 (-.f64 (.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) (.f64 (.f64 b b) #s(literal 1/120 binary64))) #s(literal 1/36 binary64)) (fma.f64 (.f64 b b) #s(literal 1/120 binary64) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 b b) b) (.f64 (.f64 b b) b)) #s(literal 1/1728000 binary64)) #s(literal 1/216 binary64)) (fma.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) (.f64 (.f64 b b) #s(literal 1/120 binary64)) (+.f64 #s(literal 1/36 binary64) (.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))))
(-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))
(.f64 (.f64 #s(literal 1/120 binary64) b) b)
(.f64 (.f64 b b) #s(literal 1/120 binary64))
(.f64 #s(literal 1/120 binary64) (.f64 b b))
#s(literal 1/120 binary64)
(*.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)))
(*.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))
(fabs.f64 (*.f64 b b))
(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)
#s(literal 1 binary64)
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (neg.f64 (.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))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 (.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 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.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)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 (.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))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 (.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)))))))
(fma.f64 (cos.f64 b) (cos.f64 a) (neg.f64 (.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))))
(fma.f64 (cos.f64 a) (cos.f64 b) (neg.f64 (.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))))
(fma.f64 (sin.f64 a) (neg.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))) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (neg.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 (cos.f64 b) (cos.f64 a)))
(-.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 (cos.f64 b) (cos.f64 a)) (.f64 (neg.f64 (neg.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 (cos.f64 b) (cos.f64 a)) (neg.f64 (.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 (neg.f64 (.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 (cos.f64 b) (cos.f64 a)))
(.f64 (sin.f64 a) (neg.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))))
(.f64 (neg.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))
(neg.f64 (.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)))
(neg.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)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.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) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 (tan.f64 b) r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
#s(approx (* (sin b) r) (*.f64 (sin.f64 b) r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#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 (/.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/6 binary64) (.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 a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (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 (.f64 a a) #s(literal 1/120 binary64)) #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 a a)
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 a a)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (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 a) (cos b)) (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 #s(literal -1/2 binary64) (*.f64 a a) #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 (* 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 (/.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/6 binary64) (.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 (+ 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 (/.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/6 binary64) (.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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 a (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/.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/6 binary64) (.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 b) (* a a)) (- b a))) (cos.f64 b))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 (* 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 (/.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/6 binary64) (.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 a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (* (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) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 (+.f64 a b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 b) (cos.f64 a)))
#s(approx (cos a) (cos.f64 a))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))))
#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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 (+.f64 a b)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (-.f64 b (neg.f64 a))))
#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 (+ 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 (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* (sin b) r) (.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 (* (sin b) r) (.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 #s(literal -1/6 binary64) (.f64 b b) #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 #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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (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 #s(literal -1/120 binary64) (.f64 b b) #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 #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 (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 b b)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) (cos.f64 a) (.f64 #s(literal -1/2 binary64) (cos.f64 a))) (.f64 b b) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 b b)) (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 #s(literal -1/2 binary64) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 b b) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #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 (/ (+ (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 (+ 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 (/ (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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 b (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* (sin b) r) (.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 (* (sin b) r) (.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 (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 a))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (cos (/ (- (* b b) (* a a)) (- b 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 b) (* a a)) (- b 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 (/ (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 (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b)
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) 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 (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* 1/120 (* b b)) 1/6) (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (* 1/120 (* b b)) (.f64 (.f64 b b) #s(literal 1/120 binary64)))
#s(approx (* b b) (*.f64 b b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (* (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) (sin.f64 a)) #s(literal 1/6 binary64) (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 (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) (neg.f64 (sin.f64 a))) b))
#s(approx (sin b) (sin.f64 b))
#s(approx (neg (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (cos b) (cos.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/120 (* b b)) 1/6) (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 5 binary64)) #s(literal 1/120 binary64)))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (.f64 b b))) (pow.f64 b #s(literal 5 binary64))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (.f64 b b))) (/.f64 #s(literal 1/6 binary64) (*.f64 b b)))) (pow.f64 b #s(literal 5 binary64))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (.f64 (.f64 (.f64 b b) (.f64 b b)) #s(literal 1/120 binary64)))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (.f64 (.f64 (.f64 b b) (.f64 b b)) (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 b b)))))
#s(approx (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (.f64 b b))) (/.f64 #s(literal 1/6 binary64) (.f64 b b)))) (.f64 (.f64 b b) (.f64 b b))))
#s(approx (- (* 1/120 (* b b)) 1/6) (.f64 (.f64 b b) #s(literal 1/120 binary64)))
#s(approx (- (* 1/120 (* b b)) 1/6) (.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (.f64 b b))) (*.f64 b b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 a b)))))
#s(approx (cos (/ (- (* b b) (* a a)) (- b a))) (cos.f64 (/.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (-.f64 a b))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (.f64 b b)) #s(literal 1/120 binary64)) (pow.f64 b #s(literal 5 binary64)))))
#s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (neg.f64 (.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (.f64 b b)) #s(literal 1/120 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (*.f64 b b)))) (pow.f64 b #s(literal 5 binary64)))))

eval45.0ms (1.4%)

Memory: 2.1MiB live, 34.6MiB allocated; 3ms collecting garbage
Compiler: Compiled 5 724 to 2 025 computations (64.6% saved)

prune65.0ms (2%)

Memory

-12.2MiB live, 44.0MiB allocated; 11ms collecting garbage

Pruning

74 alts after pruning (69 fresh and 5 done)

	Pruned	Kept	Total
New	383	25	408
Fresh	15	44	59
Picked	2	3	5
Done	0	2	2
Total	400	74	474

Accuracy

99.9%

Counts

474 → 74

Alt Table

Click to see full alt table

Status	Accuracy	Program
	76.6%	(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) r) (cos.f64 (+.f64 a b)))
	99.4%	(/.f64 (.f64 (sin.f64 b) r) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	65.5%	(/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
	64.2%	(/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	57.1%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
	57.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
	53.6%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b))))
	56.1%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
✓	54.6%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	54.1%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 a (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))))
	10.0%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
	38.3%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
	53.5%	(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
	53.8%	(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a b)))
	33.3%	(/.f64 (.f64 #s(approx (sin b) b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) 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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a))))
	36.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.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	77.8%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (sin.f64 (+.f64 b (PI.f64))) (.f64 (cos.f64 a) (cos.f64 b))))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (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))))))))
✓	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
	58.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx ( (cos a) (cos b)) (cos.f64 b))))
	78.7%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 a) (cos.f64 b))))
✓	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	56.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 #s(literal -1/120 binary64) (.f64 b b) #s(literal 1/6 binary64)) (.f64 b b)) #s(literal 1 binary64)) b)) (sin.f64 a))))
	99.3%	(/.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.2%	(/.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 (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 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	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))))
	57.5%	(/.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)))))
	63.0%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	54.3%	(/.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))))
	58.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	59.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	39.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
	32.0%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	39.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	20.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64)) (.f64 a a)) (-.f64 b a))))
	47.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) #s(approx (- b a) (.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
	37.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) #s(approx (- b a) b))))
	20.2%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (-.f64 b a))))
	42.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (neg.f64 (*.f64 a a))) (-.f64 b a))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) #s(approx (cos b) #s(literal 1 binary64)))))
	49.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b))))) (-.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b)))))
	10.4%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))))
	53.6%	(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 b b) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
	53.8%	(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
	53.8%	(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 #s(literal -1/2 binary64) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
	54.7%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(approx (- (* 1/120 (* b b)) 1/6) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #s(approx (- ( 1/120 (* b b)) 1/6) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (sin.f64 a))))
	54.7%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
	15.2%	(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (.f64 b b))) (/.f64 #s(literal 1/6 binary64) (.f64 b b)))) (pow.f64 b #s(literal 5 binary64)))))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) #s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (.f64 b b))) (/.f64 #s(literal 1/6 binary64) (*.f64 b b)))) (pow.f64 b #s(literal 5 binary64)))))) (sin.f64 a))))
	56.9%	(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (sin.f64 a))))
	56.9%	(/.f64 (.f64 r #s(approx (sin b) b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
	76.7%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
	54.6%	(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
	50.4%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
	57.1%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
	57.7%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
	54.5%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 b (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
	53.8%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	53.4%	(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
	53.6%	(.f64 r #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)))
	53.6%	#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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))
	57.2%	#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
	53.5%	#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
	28.3%	#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)))))
	56.9%	#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)))))))
	27.9%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (PI.f64))))))
	33.5%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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))))
	33.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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))))
✓	14.8%	#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))))
✓	34.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
	33.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))

Compiler

Compiled 2 824 to 1 846 computations (34.6% saved)

regimes118.0ms (3.7%)

Memory

10.8MiB live, 53.1MiB allocated; 4ms collecting garbage

Counts

124 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 #s(approx (sin b) b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) #s(approx (cos b) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (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))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a 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 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a 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 (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))))
(/.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 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (*.f64 b b)) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
(/.f64 (.f64 r (sin.f64 b)) (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 a b) #s(literal 1 binary64)) b))))
(/.f64 (.f64 (sin.f64 b) r) (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)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (neg.f64 (*.f64 a a))) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) #s(approx (- b a) b))))
(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) #s(approx (- b a) (.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) r) (cos.f64 (+.f64 a b)))
(/.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 (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (-.f64 b a))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (/ (- ( b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (sin.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64)) (.f64 a a)) (-.f64 b 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)))))))
#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 (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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))
(.f64 r #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)))
(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 #s(literal -1/2 binary64) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (sin b) (.f64 (fma.f64 #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 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #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 #s(approx (- (* 1/120 (* b b)) 1/6) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #s(approx (- ( 1/120 (* b b)) 1/6) #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 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (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 (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx ( (cos a) (cos b)) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b))))) (-.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b)))))
(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 b b) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (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 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 b (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
(/.f64 (.f64 (sin.f64 b) r) #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 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (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 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 #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (sin.f64 a))))
(/.f64 (.f64 r #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))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (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)) (-.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)))))
#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)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (cos.f64 b) a)) (sin.f64 b)) a))) (.f64 a 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 #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 #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (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 a) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (sin.f64 (+.f64 b (PI.f64))) (.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (sin.f64 (+.f64 b (PI.f64))) (sin.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 a) (cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 a) (cos.f64 b))))
(/.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 r (sin.f64 b)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (.f64 b b))) (/.f64 #s(literal 1/6 binary64) (.f64 b b)))) (pow.f64 b #s(literal 5 binary64)))))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) #s(approx (* (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (.f64 b b))) (/.f64 #s(literal 1/6 binary64) (*.f64 b b)))) (pow.f64 b #s(literal 5 binary64)))))) (sin.f64 a))))
(/.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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #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)) (-.f64 (.f64 (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 a)) (.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 a) (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))))))))
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (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 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #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 (-.f64 (.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (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:

29.0ms	a
28.0ms	b
28.0ms	r
27.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))

Results

Accuracy	Segments	Branch
99.4%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
99.4%	1	`r`
99.4%	1	`a`
99.4%	1	`b`

Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes101.0ms (3.2%)

Memory

-8.1MiB live, 46.0MiB allocated; 4ms collecting garbage

Counts

105 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 #s(approx (sin b) b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) #s(approx (cos b) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (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))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a 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 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a 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 (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))))
(/.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 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (*.f64 b b)) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
(/.f64 (.f64 r (sin.f64 b)) (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 a b) #s(literal 1 binary64)) b))))
(/.f64 (.f64 (sin.f64 b) r) (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)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (neg.f64 (*.f64 a a))) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) #s(approx (- b a) b))))
(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) #s(approx (- b a) (.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) r) (cos.f64 (+.f64 a b)))
(/.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 (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (-.f64 b a))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (/ (- ( b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (sin.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64)) (.f64 a a)) (-.f64 b 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)))))))
#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 (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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))
(.f64 r #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)))
(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 #s(literal -1/2 binary64) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (sin b) (.f64 (fma.f64 #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 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #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 #s(approx (- (* 1/120 (* b b)) 1/6) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #s(approx (- ( 1/120 (* b b)) 1/6) #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 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (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 (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx ( (cos a) (cos b)) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b))))) (-.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b)))))
(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 b b) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (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 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 b (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
(/.f64 (.f64 (sin.f64 b) r) #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 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (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 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 #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (sin.f64 a))))
(/.f64 (.f64 r #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))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (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)) (-.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)))))
#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)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (cos.f64 b) a)) (sin.f64 b)) a))) (.f64 a 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 #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 #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (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:

25.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
24.0ms	b
24.0ms	a
24.0ms	r

Results

Accuracy	Segments	Branch
99.4%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
99.4%	1	`r`
99.4%	1	`a`
99.4%	1	`b`

Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes98.0ms (3%)

Memory

1.1MiB live, 45.3MiB allocated; 3ms collecting garbage

Counts

103 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 #s(approx (sin b) b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) #s(approx (cos b) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (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))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a 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 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a 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 (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) (*.f64 (neg.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) (cos.f64 b))))
(/.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 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (*.f64 b b)) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
(/.f64 (.f64 r (sin.f64 b)) (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 a b) #s(literal 1 binary64)) b))))
(/.f64 (.f64 (sin.f64 b) r) (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)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 #s(approx (- ( b b) (* a a)) (neg.f64 (*.f64 a a))) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) #s(approx (- b a) b))))
(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a)))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) #s(approx (- b a) (.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 a b) (-.f64 b a)) (-.f64 b a))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) r) (cos.f64 (+.f64 a b)))
(/.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 (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (-.f64 b a))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (/ (- ( b b) (* a a)) (- b 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 b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (+ ( (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) #s(approx ( (+ (* (- (* 1/120 (* b b)) 1/6) (* b b)) 1) b) b))) (sin.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64)) (.f64 a a)) (-.f64 b 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)))))))
#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 (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b 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))
(.f64 r #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)))
(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 #s(literal -1/2 binary64) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (sin.f64 a))))
(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (sin b) (.f64 (fma.f64 #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 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #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 #s(approx (- (* 1/120 (* b b)) 1/6) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #s(approx (sin b) (.f64 (fma.f64 #s(approx (- ( 1/120 (* b b)) 1/6) #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 #s(literal 1/120 binary64) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (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 (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx ( (cos a) (cos b)) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (.f64 (.f64 #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (.f64 #s(literal -1/2 binary64) a)) a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) b))))) (-.f64 (.f64 #s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) a) (cos.f64 b)))))
(/.f64 (.f64 r #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))) (fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 b b) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 #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))) (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 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 b (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))))
(/.f64 (.f64 (sin.f64 b) r) #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 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (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 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 #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (sin.f64 a))))
(/.f64 (.f64 r #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))) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 #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))) (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)) (-.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)))))
#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)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (cos.f64 b) a)) (sin.f64 b)) a))) (.f64 a 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 #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 #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))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #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)) (sin.f64 a))))

Outputs
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))

Calls

4 calls:

24.0ms	a
23.0ms	r
23.0ms	b
23.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))

Results

Accuracy	Segments	Branch
76.7%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
76.7%	1	`r`
76.7%	1	`a`
76.7%	1	`b`

Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes35.0ms (1.1%)

Memory

-0.5MiB live, 19.1MiB allocated; 1ms collecting garbage

Counts

35 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 #s(approx (sin b) b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) #s(approx (cos b) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (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))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a 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 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))

Outputs
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))

Calls

4 calls:

9.0ms	a
8.0ms	r
8.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
8.0ms	b

Results

Accuracy	Segments	Branch
76.7%	1	`r`
76.7%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
76.7%	1	`a`
76.7%	1	`b`

Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes34.0ms (1.1%)

Memory

-5.5MiB live, 18.7MiB allocated; 0ms collecting garbage

Counts

34 → 3

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 #s(approx (sin b) b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) (fma.f64 (neg.f64 a) #s(approx (sin b) b) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( a (- (* (* (cos b) a) -1/2) (sin b))) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 a #s(approx (- ( (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a)) #s(approx (cos b) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (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))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a 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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))

Calls

4 calls:

8.0ms	b
8.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
8.0ms	a
8.0ms	r

Results

Accuracy	Segments	Branch
60.2%	2	`r`
64.1%	3	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
76.8%	3	`a`
76.9%	3	`b`

Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes10.0ms (0.3%)

Memory

6.8MiB live, 6.8MiB allocated; 0ms collecting garbage

Counts

18 → 3

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))

Outputs
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))

Calls

2 calls:

5.0ms	b
5.0ms	a

Results

Accuracy	Segments	Branch
75.0%	3	`a`
76.8%	3	`b`

Compiler

Compiled 2 to 6 computations (-200% saved)

regimes5.0ms (0.2%)

Memory

-4.0MiB live, 3.8MiB allocated; 0ms collecting garbage

Counts

17 → 3

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))

Outputs

#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))

#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))

#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))

Calls

1 calls:

5.0ms

Results

Accuracy	Segments	Branch
76.7%	3	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes15.0ms (0.5%)

Memory

2.7MiB live, 10.6MiB allocated; 0ms collecting garbage

Counts

13 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (sin b) r) (cos (/ (- (* b b) (* a a)) (- b a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (/ (- ( b b) (* a a)) (- b a))) #s(approx (+ (* (neg a) (sin b)) (cos b)) #s(literal 1 binary64))))

Outputs
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (tan.f64 b) r))

Calls

4 calls:

4.0ms	a
3.0ms	b
3.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
3.0ms	r

Results

Accuracy	Segments	Branch
57.2%	1	`r`
57.2%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
57.2%	1	`a`
57.2%	1	`b`

Compiler

Compiled 11 to 17 computations (-54.5% saved)

regimes10.0ms (0.3%)

Memory

0.7MiB live, 8.6MiB allocated; 1ms collecting garbage

Accuracy

Total -13.1b remaining (-31%)

Threshold costs -13.1b (-31%)

Counts

8 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#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))) #s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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 (/ (* r (sin b)) (cos (+ a b))) (.f64 r #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))))

Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))

Calls

4 calls:

2.0ms	r
2.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
2.0ms	b
2.0ms	a

Results

Accuracy	Segments	Branch
34.1%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
34.1%	1	`b`
34.1%	1	`r`
34.1%	1	`a`

Compiler

Compiled 11 to 17 computations (-54.5% saved)

bsearch37.0ms (1.2%)

Memory

-0.2MiB live, 9.1MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	0.00044578928220316414	5207.463245634909
18.0ms	-11548854.948766915	-1107968.9811320244

Samples

22.0ms	171×	1	valid
4.0ms	69×	0	valid

Compiler

Compiled 312 to 344 computations (-10.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 20.0ms

ival-cos: 8.0ms (39.3% of total)

ival-sin: 6.0ms (29.5% of total)

adjust: 3.0ms (14.7% of total)

ival-div!: 2.0ms (9.8% of total)

ival-add!: 1.0ms (4.9% of total)

ival-mult!: 1.0ms (4.9% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.00044578928220316414	5207.463245634909
0.0ms	-11548854.948766915	-1107968.9811320244

Compiler

Compiled 312 to 344 computations (-10.3% saved)

bsearch2.0ms (0%)

Memory

-6.9MiB live, 0.9MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.00044578928220316414	5207.463245634909
0.0ms	-11548854.948766915	-1107968.9811320244

Compiler

Compiled 357 to 389 computations (-9% saved)

derivations227.0ms (7.1%)

Memory

4.4MiB live, 4.4MiB allocated; 0ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 87 to 54 computations (37.9% saved)

preprocess74.0ms (2.3%)

Memory: -1.7MiB live, 93.0MiB allocated; 5ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 369 to 322 computations (12.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze199.0ms (6.2%)

sample1.1s (34.3%)

preprocess36.0ms (1.1%)

series19.0ms (0.6%)

rewrite155.0ms (4.8%)

eval8.0ms (0.2%)

prune13.0ms (0.4%)

series50.0ms (1.6%)

rewrite171.0ms (5.3%)

eval40.0ms (1.2%)

prune42.0ms (1.3%)

series53.0ms (1.7%)

rewrite154.0ms (4.8%)

eval41.0ms (1.3%)

prune47.0ms (1.5%)

series43.0ms (1.3%)

rewrite160.0ms (5%)

eval45.0ms (1.4%)

prune65.0ms (2%)

regimes118.0ms (3.7%)

regimes101.0ms (3.2%)

regimes98.0ms (3%)

regimes35.0ms (1.1%)

regimes34.0ms (1.1%)

regimes10.0ms (0.3%)

regimes5.0ms (0.2%)

regimes15.0ms (0.5%)

regimes10.0ms (0.3%)

bsearch37.0ms (1.2%)

bsearch1.0ms (0%)

bsearch2.0ms (0%)

derivations227.0ms (7.1%)

preprocess74.0ms (2.3%)

end0.0ms (0%)

Profiling