Metrics for rsin A (should all be same)

start0.0ms (0%)

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

analyze250.0ms (5%)

Memory

6.6MiB live, 438.9MiB allocated; 35ms 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.9s (37.8%)

Memory

70.7MiB live, 2 317.8MiB allocated; 467ms collecting garbage

Samples

1.4s	5 992×	1	valid
139.0ms	2 264×	0	valid

Precisions

Click to see histograms. Total time spent on operations: 1.2s

ival-cos: 478.0ms (41% of total)

ival-sin: 317.0ms (27.2% of total)

adjust: 125.0ms (10.7% of total)

ival-div!: 106.0ms (9.1% of total)

ival-mult!: 82.0ms (7% of total)

ival-add!: 58.0ms (5% of total)

Bogosity

explain151.0ms (3%)

Memory

-4.3MiB live, 202.6MiB allocated; 30ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
78	122	(-3.0437721531620594e-191 -1.5275704471158713e+48 1.4857436056134526e-93)	-	`(cos.f64 (+.f64 a b))`
0	0	-	-	`(+.f64 a b)`
0	0	-	-	`(sin.f64 b)`
0	0	-	-	`a`
0	0	-	-	`(*.f64 r (sin.f64 b))`
0	0	-	-	`r`
0	0	-	-	`b`
0	0	-	-	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (+.f64 a b))`	sensitivity	200	0

Confusion

	Predicted +	Predicted -
+	76	0
-	124	56

Precision

0.38

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	76	0	0
-	124	0	56

Precision?

0.38

Recall?

1.0

Freqs

test

number	freq
0	56
1	200

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

74.0ms	396×	1	valid
7.0ms	116×	0	valid

Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions

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

ival-sin: 24.0ms (39.6% of total)

ival-cos: 18.0ms (29.7% of total)

adjust: 8.0ms (13.2% of total)

ival-mult!: 5.0ms (8.3% of total)

ival-div!: 4.0ms (6.6% of total)

ival-add!: 3.0ms (5% of total)

preprocess190.0ms (3.8%)

Memory

-1.4MiB live, 179.9MiB allocated; 18ms 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
0	8	9
0	13	9
1	24	9
2	42	9
3	65	9
4	83	9
5	107	9
6	205	9
7	799	9
8	5290	9
0	8277	9

Stop Event

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

Calls

Call 1

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

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

Symmetry

(negabs r)

Compiler

Compiled 9 to 8 computations (11.1% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Compiler

Compiled 9 to 8 computations (11.1% saved)

series35.0ms (0.7%)

Memory

4.0MiB live, 60.7MiB allocated; 6ms 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
16.0ms	b	@	inf	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
5.0ms	b	@	0	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
3.0ms	b	@	-inf	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms	r	@	inf	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms	r	@	0	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)

rewrite193.0ms (3.8%)

Memory

-25.9MiB live, 253.4MiB allocated; 19ms 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))))))
(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)))))
(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))))
(-.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 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (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 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64)))) (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 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (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 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a a (-.f64 (.f64 b b) (.f64 a b)))) (/.f64 (pow.f64 b #s(literal 3 binary64)) (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 (fma.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))))) (.f64 #s(literal 1 binary64) (.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 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (.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 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (cos (+ a b)) (fma.f64 (-.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)) a (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) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (fma.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (.f64 (fma.f64 (fma.f64 #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 (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/120 binary64) r)) (.f64 b b) (.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 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 (-.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)) b (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))))

eval10.0ms (0.2%)

Memory: 18.4MiB live, 18.4MiB allocated; 0ms collecting garbage
Compiler: Compiled 1 566 to 357 computations (77.2% saved)

prune15.0ms (0.3%)

Memory

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

Pruning

22 alts after pruning (21 fresh and 1 done)

	Pruned	Kept	Total
New	58	21	79
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	58	22	80

Accuracy

99.7%

Counts

80 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a 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))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	36.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	35.7%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	30.9%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 b b (-.f64 (.f64 a a) (*.f64 b a))))))
✓	75.2%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	62.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
	64.9%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
▶	56.4%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	53.2%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
	53.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
▶	50.7%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	51.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	54.0%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	49.2%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
	49.4%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
	75.1%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	53.8%	#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))))
▶	56.4%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	49.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))

Compiler

Compiled 809 to 544 computations (32.8% saved)

series91.0ms (1.8%)

Memory

-33.0MiB live, 117.0MiB allocated; 30ms collecting garbage

Counts

33 → 174

Calls

Call 1

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

Calls

9 calls:

Time	Variable		Point	Expression
20.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) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -1/2)
8.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) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -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) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -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) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -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) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -1/2)

rewrite288.0ms (5.7%)

Memory

22.3MiB live, 255.0MiB allocated; 26ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	779	4703
0	828	4242
1	4657	4212
0	8056	4043

Stop Event

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

Counts

207 → 334

Calls

Call 1

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

eval64.0ms (1.3%)

Memory: -31.2MiB live, 118.9MiB allocated; 12ms collecting garbage
Compiler: Compiled 10 874 to 1 671 computations (84.6% saved)

prune69.0ms (1.4%)

Memory

20.4MiB live, 114.4MiB allocated; 3ms collecting garbage

Pruning

59 alts after pruning (56 fresh and 3 done)

	Pruned	Kept	Total
New	375	48	423
Fresh	8	8	16
Picked	2	3	5
Done	1	0	1
Total	386	59	445

Accuracy

99.8%

Counts

445 → 59

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.3%	(/.f64 (.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
▶	75.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	56.3%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.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.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
	99.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.5%	(/.f64 (.f64 r (sin.f64 b)) (-.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))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.3%	(/.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 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
	56.6%	(/.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)))))
	61.3%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) (sin.f64 a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) #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)))) (.f64 (sin.f64 b) (sin.f64 a))))
	53.4%	(/.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))))
	50.8%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	50.7%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	50.8%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #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))) (*.f64 (sin.f64 b) (sin.f64 a))))
	57.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	36.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	29.8%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 a a) (*.f64 b b)) (-.f64 a b))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.7%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
	34.8%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
▶	17.6%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
	17.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
	62.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
✓	56.4%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	53.2%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
	51.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	54.0%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	50.5%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	50.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 #s(approx (- ( (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1/2 binary64) b)) b (cos.f64 a))))
	49.2%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (cos.f64 a)))))))
	31.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
	50.1%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
▶	49.9%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	50.0%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	50.0%	(/.f64 (.f64 r #s(approx (sin b) b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	49.4%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
	30.4%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
	50.3%	(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	49.8%	(/.f64 #s(approx (* r (sin b)) (.f64 (fma.f64 (.f64 (.f64 b b) r) #s(literal -1/6 binary64) r) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	75.1%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	30.9%	#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (.f64 b r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
	49.7%	#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 b (/.f64 r (cos.f64 a))))
	53.8%	#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))))
	30.9%	#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)))))))
	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓	56.4%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	30.1%	#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))))
	30.2%	#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))))
	30.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #s(approx (tan b) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
▶	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
	30.3%	#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 2 729 to 1 928 computations (29.4% saved)

series86.0ms (1.7%)

Memory

14.6MiB live, 65.4MiB allocated; 4ms collecting garbage

Counts

39 → 209

Calls

Call 1

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

Outputs
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b 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) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* r (sin b)) (cos (+ 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 (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b r)))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* (* b b) 1/120) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* (* b b) 1/120) 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 (- (* (* b b) 1/120) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* (* b b) 1/120) 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)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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
45.0ms	a	@	0	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) 1 (pow (sin b) -1) -1 (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) (* b b) 1/120 1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)))
11.0ms	b	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) 1 (pow (sin b) -1) -1 (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) (* b b) 1/120 1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)))
5.0ms	r	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) 1 (pow (sin b) -1) -1 (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) (* b b) 1/120 1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)))
5.0ms	b	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) 1 (pow (sin b) -1) -1 (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) (* b b) 1/120 1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)))
4.0ms	r	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) 1 (pow (sin b) -1) -1 (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg b) (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) (* b b) 1/120 1/6 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)))

rewrite226.0ms (4.5%)

Memory

-11.6MiB live, 313.5MiB allocated; 35ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	779	6328
0	830	6057
1	4283	5345
0	8382	5137

Stop Event

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

Counts

248 → 432

Calls

Call 1

Inputs
(/.f64 (.f64 r (sin.f64 b)) (-.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 r (sin.f64 b))
r
(sin.f64 b)
b
(-.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 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
#s(literal -1 binary64)
(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)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))
(neg.f64 b)
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(.f64 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)
(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 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))
(.f64 (.f64 b b) #s(literal 1/120 binary64))
(*.f64 b b)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (sin.f64 b) (sin.f64 a))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b 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) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* r (sin b)) (cos (+ 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 (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b r)))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* (* b b) 1/120) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* (* b b) 1/120) 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 (- (* (* b b) 1/120) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* (* b b) 1/120) 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)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
r
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(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) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 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))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(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 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (+.f64 a b))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.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)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (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 a b)) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 b))) (cos.f64 (-.f64 a (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b a)) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 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)))
(fma.f64 (sin.f64 b) #s(literal 0 binary64) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.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) #s(literal 0 binary64)) (.f64 (cos.f64 b) #s(literal 1 binary64)))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(fma.f64 (sin.f64 a) #s(literal 0 binary64) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.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) #s(literal 0 binary64)) (.f64 (cos.f64 a) #s(literal 1 binary64)))
a
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 a)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(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) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
#s(literal 1 binary64)
(*.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 b))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
#s(literal -1 binary64)
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(sin.f64 a)
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 #s(approx (tan b) b) r))
(*.f64 #s(approx (tan b) b) r)
(*.f64 r #s(approx (tan b) b))
#s(approx (tan b) b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))
(*.f64 #s(literal -1 binary64) b)
(*.f64 b #s(literal -1 binary64))
(neg.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 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))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(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 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (+.f64 a b))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.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)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(/.f64 (-.f64 (.f64 a a) (.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (.f64 b b) (.f64 a b))))
(+.f64 a b)
(+.f64 b a)
(.f64 r (/.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
(.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) r)
(.f64 r #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.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)))
(fma.f64 #s(literal 1 binary64) b (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) b))
(fma.f64 b #s(literal 1 binary64) (.f64 b (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b)))
(+.f64 (.f64 b #s(literal 1 binary64)) (.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) b) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) 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 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)))))
(/.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)))))
(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 (pow.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 2 binary64)) #s(literal 1/36 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/120 binary64) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 3 binary64)) #s(literal 1/216 binary64)) (+.f64 (pow.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 2 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 b b) #s(literal 1/120 binary64))
(.f64 #s(literal 1/120 binary64) (.f64 b b))
(.f64 b (.f64 b #s(literal 1/120 binary64)))
(*.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 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (neg.f64 b) #s(literal 2 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/120 binary64)
#s(literal 1/6 binary64)
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 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))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(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 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (+.f64 a b))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.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)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 a)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (tan b)) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.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)) a (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (.f64 (.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 a a)) (cos.f64 b) (.f64 #s(literal -1/2 binary64) (cos.f64 b))) (.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 a a)) (cos.f64 b) (.f64 #s(literal 1/24 binary64) (cos.f64 b))) (.f64 a a) (.f64 #s(literal -1/2 binary64) (cos.f64 b))) (.f64 a a) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 a a) #s(literal 1/24 binary64)) (.f64 a a)) #s(literal 1/2 binary64)) (.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (*.f64 a a)) (sin.f64 b) (sin.f64 b)) a))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 a a) #s(literal 1/120 binary64)) (sin.f64 b) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 a a)) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (sin.f64 b))) (.f64 a a) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.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 (.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 (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (.f64 (.f64 a r) (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (sin.f64 b) r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (.f64 r (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 r (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (.f64 (sin.f64 b) r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (.f64 r (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (.f64 (.f64 r (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (.f64 (sin.f64 b) r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (.f64 r (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))))) a (.f64 #s(literal 1 binary64) (.f64 r (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 a) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) a) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) a) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal -1/2 binary64))) a (neg.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.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)) a (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.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)) a (cos.f64 b)))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (*.f64 a a)) (sin.f64 b) (sin.f64 b)) a))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 a a) #s(literal 1/120 binary64)) (sin.f64 b) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 a a)) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (sin.f64 b))) (.f64 a a) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (.f64 (-.f64 (-.f64 (.f64 (/.f64 (PI.f64) a) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 b a)) a))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) r) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) r) #s(literal -1/5040 binary64) (.f64 #s(literal 1/120 binary64) r)) (.f64 b b) (.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (.f64 (.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (.f64 #s(literal -1/2 binary64) (cos.f64 a))) (.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (.f64 #s(literal 1/24 binary64) (cos.f64 a))) (.f64 b b) (.f64 #s(literal -1/2 binary64) (cos.f64 a))) (.f64 b b) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (pow.f64 b #s(literal -1 binary64)))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (.f64 b b) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (.f64 b b) #s(literal 7/360 binary64)) (.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b))
#s(approx (* r (tan b)) (.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (tan b)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 2/15 binary64) r)) (.f64 b b) (.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 (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (.f64 b r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 b (.f64 r (/.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) b (.f64 #s(literal 1 binary64) (.f64 r (/.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (.f64 r (/.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) #s(literal -1/3 binary64) (neg.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 (.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (.f64 r (/.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 b) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) b) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (neg.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) b) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1/2 binary64))) b (neg.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))
#s(approx (neg b) (neg.f64 b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) r) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) r) #s(literal -1/5040 binary64) (.f64 #s(literal 1/120 binary64) r)) (.f64 b b) (.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) b)
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* b b) 1/120) 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 (- (* (* b b) 1/120) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* (* b b) 1/120) 1/6) (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (* (* b b) 1/120) (.f64 (.f64 b b) #s(literal 1/120 binary64)))
#s(approx (* b b) (*.f64 b b))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) (.f64 (fma.f64 (fma.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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (pow (sin b) -1) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (.f64 (-.f64 (-.f64 (.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 a b)) b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 5 binary64)) #s(literal 1/120 binary64)))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (.f64 (-.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (pow.f64 b #s(literal 5 binary64))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (.f64 (-.f64 (+.f64 (pow.f64 b #s(literal -4 binary64)) #s(literal 1/120 binary64)) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (pow.f64 b #s(literal 5 binary64))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1/120 binary64)))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64)))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (.f64 (-.f64 (+.f64 (pow.f64 b #s(literal -4 binary64)) #s(literal 1/120 binary64)) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (- (* (* b b) 1/120) 1/6) (.f64 (.f64 b b) #s(literal 1/120 binary64)))
#s(approx (- (* (* b b) 1/120) 1/6) (.f64 (-.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (*.f64 b b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (cos.f64 (-.f64 a (neg.f64 b))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (neg.f64 (.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64)) #s(literal 1/120 binary64)) (pow.f64 b #s(literal 5 binary64)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (neg.f64 (.f64 (-.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64)) #s(literal 1/120 binary64)) (pow.f64 b #s(literal -4 binary64))) (pow.f64 b #s(literal 5 binary64)))))

eval71.0ms (1.4%)

Memory: -11.3MiB live, 181.5MiB allocated; 18ms collecting garbage
Compiler: Compiled 15 546 to 2 004 computations (87.1% saved)

prune69.0ms (1.4%)

Memory

-12.3MiB live, 182.3MiB allocated; 8ms collecting garbage

Pruning

69 alts after pruning (64 fresh and 5 done)

	Pruned	Kept	Total
New	490	23	513
Fresh	10	41	51
Picked	3	2	5
Done	0	3	3
Total	503	69	572

Accuracy

99.8%

Counts

572 → 69

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.3%	(/.f64 (/.f64 (.f64 r #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))))
	17.6%	(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
▶	75.2%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
	34.5%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
	99.3%	(/.f64 (.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	75.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (cos.f64 (+.f64 a b)))
	50.0%	(/.f64 (.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
	47.1%	(/.f64 (.f64 r (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))) (-.f64 (.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))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.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.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
	99.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.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 a)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a))))
	77.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))) (sin.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.3%	(/.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 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
	56.6%	(/.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)))))
	61.3%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) (sin.f64 a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) #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)))) (.f64 (sin.f64 b) (sin.f64 a))))
	53.4%	(/.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))))
▶	50.8%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #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))) (*.f64 (sin.f64 b) (sin.f64 a))))
	57.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	36.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	29.8%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 a a) (*.f64 b b)) (-.f64 a b))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.7%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
	34.8%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
✓	17.6%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
	17.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
	62.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
✓	56.4%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	53.2%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
	51.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	54.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	50.5%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	50.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 #s(approx (- ( (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1/2 binary64) b)) b (cos.f64 a))))
	49.2%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (cos.f64 a)))))))
	31.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
	13.9%	(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
	50.1%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	49.2%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
	49.3%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
▶	50.1%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))))
	49.3%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	49.4%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	49.4%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	12.6%	(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (.f64 (-.f64 (+.f64 (pow.f64 b #s(literal -4 binary64)) #s(literal 1/120 binary64)) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (pow.f64 b #s(literal 5 binary64)))))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	49.4%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
	30.4%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
	50.3%	(/.f64 (.f64 r #s(approx (sin b) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	49.8%	(/.f64 #s(approx (* r (sin b)) (.f64 (fma.f64 (.f64 (.f64 b b) r) #s(literal -1/6 binary64) r) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	49.0%	(.f64 r (/.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
	30.9%	#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (.f64 b r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
	49.7%	#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
	53.8%	#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))))
	30.9%	#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)))))))
	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓	56.4%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	30.1%	#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))))
	30.2%	#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))))
	30.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #s(approx (tan b) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
✓	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
▶	30.3%	#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 3 518 to 2 459 computations (30.1% saved)

series43.0ms (0.9%)

Memory

6.3MiB live, 100.8MiB allocated; 5ms collecting garbage

Counts

50 → 239

Calls

Call 1

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

Outputs
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* b (* r (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* r (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* (* b b) r) #s(hole binary64 (* (pow b 2) r)))
#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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* -1 (* b (* r (- (* -1/3 (pow b 2)) 1))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* -1 (* r (- (* -1/3 (pow b 2)) 1)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ (* 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 (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* (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) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (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 (/ 1 (/ 1 (sin b))) #s(hole binary64 b))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* r (sin b)) (cos (+ 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 (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 r))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (+ r (* 1/3 (* (pow b 2) r)))))
#s(approx (* b b) #s(hole binary64 (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* (* b b) 1/120) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2))))))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 1/24))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 (+ 1/24 (* -1/720 (pow b 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 (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (sin b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 (sin b))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* 1/3 (* (pow b 3) r))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* (pow b 3) (+ (* 1/3 r) (/ r (pow b 2))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* 1/3 (* (pow b 2) r))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* (pow b 2) (+ (* 1/3 r) (/ r (pow b 2))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* (* b b) 1/120) 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 (- (* (* b b) 1/120) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 (* (pow b 2) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* (pow b 6) (- (+ (* 1/24 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 (* (pow b 2) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ r (pow b 2))) (* -1/3 r))))))
#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 (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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	b	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (/ 1 (sin b))) (sin a)) (/ 1 (/ 1 (sin b))) 1 (/ 1 (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) 1/120 1/6 (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* (+ (* (* b b) -1/720) 1/24) (* b b)) (+ (* (* b b) -1/720) 1/24) -1/720 1/24 1/2 (* (sin b) (sin a)))
6.0ms	b	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (/ 1 (sin b))) (sin a)) (/ 1 (/ 1 (sin b))) 1 (/ 1 (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) 1/120 1/6 (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* (+ (* (* b b) -1/720) 1/24) (* b b)) (+ (* (* b b) -1/720) 1/24) -1/720 1/24 1/2 (* (sin b) (sin a)))
5.0ms	r	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (/ 1 (sin b))) (sin a)) (/ 1 (/ 1 (sin b))) 1 (/ 1 (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) 1/120 1/6 (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* (+ (* (* b b) -1/720) 1/24) (* b b)) (+ (* (* b b) -1/720) 1/24) -1/720 1/24 1/2 (* (sin b) (sin a)))
5.0ms	r	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (/ 1 (sin b))) (sin a)) (/ 1 (/ 1 (sin b))) 1 (/ 1 (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) 1/120 1/6 (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* (+ (* (* b b) -1/720) 1/24) (* b b)) (+ (* (* b b) -1/720) 1/24) -1/720 1/24 1/2 (* (sin b) (sin a)))
5.0ms	r	@	0	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (/ 1 (/ 1 (sin b))) (sin a)) (/ 1 (/ 1 (sin b))) 1 (/ 1 (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (* r (sin b)) (sin b) (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (- (* (* b b) 1/120) 1/6) (* (* b b) 1/120) 1/120 1/6 (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (* (/ 1 (pow (sin b) -1)) (sin a)) (/ 1 (pow (sin b) -1)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* (+ (* (* b b) -1/720) 1/24) (* b b)) (+ (* (* b b) -1/720) 1/24) -1/720 1/24 1/2 (* (sin b) (sin a)))

rewrite224.0ms (4.4%)

Memory

-7.3MiB live, 331.7MiB allocated; 72ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	707	6983
0	781	5948
1	3457	5873
0	8230	5661

Stop Event

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

Counts

289 → 558

Calls

Call 1

Inputs
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(sin.f64 a)
#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 (tan b)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (*.f64 b b) r) r) b)
(fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 b b) r) r)
#s(literal 1/3 binary64)
(.f64 (.f64 b b) r)
(*.f64 b 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 #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 (/ 1 (pow (sin b) -1)) b) (sin.f64 a))))
(.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)
(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 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))
(.f64 (.f64 b b) #s(literal 1/120 binary64))
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a)))
(*.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))
#s(approx (/ 1 (pow (sin b) -1)) b)
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a)))
(.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))
(-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64))
(.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b))
(fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 b) (sin.f64 a))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* b (* r (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* r (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* (* b b) r) #s(hole binary64 (* (pow b 2) r)))
#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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* -1 (* b (* r (- (* -1/3 (pow b 2)) 1))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* -1 (* r (- (* -1/3 (pow b 2)) 1)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ (* 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 (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* (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) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (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)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (sin b))) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (/ 1 (/ 1 (sin b))) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (/ 1 (/ 1 (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 (* (/ 1 (/ 1 (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 (/ 1 (/ 1 (sin b))) #s(hole binary64 b))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* r (sin b)) (cos (+ 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 (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 r))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (+ r (* 1/3 (* (pow b 2) r)))))
#s(approx (* b b) #s(hole binary64 (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) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (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)) (* (/ 1 (pow (sin b) -1)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* (* b b) 1/120) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (/ 1 (pow (sin b) -1)) (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 (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2))))))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 1/24))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 (+ 1/24 (* -1/720 (pow b 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 (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (sin b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 (sin b))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* 1/3 (* (pow b 3) r))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* (pow b 3) (+ (* 1/3 r) (/ r (pow b 2))))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* 1/3 (* (pow b 2) r))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) #s(hole binary64 (* (pow b 2) (+ (* 1/3 r) (/ r (pow b 2))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (- (* (* b b) 1/120) 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 (- (* (* b b) 1/120) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* (* b b) 1/120) 1/6) #s(hole binary64 (* (pow b 2) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(hole binary64 (* (pow b 6) (- (+ (* 1/24 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(hole binary64 (* (pow b 2) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ r (pow b 2))) (* -1/3 r))))))
#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 (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 (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 (.f64 #s(literal -1 binary64) r) (.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
(/.f64 (.f64 #s(literal 1 binary64) r) (.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) (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 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (sin.f64 b))
(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 -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (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 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(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))) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (sin.f64 a)))) (.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (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))))))
(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 b)) (sin.f64 a)))
(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 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.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 b)) (sin.f64 a)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.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 (fma.f64 #s(literal -1 binary64) a (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 b))) (cos.f64 (-.f64 a (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b a)) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 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)))
(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)))))
(sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.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)))
(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)))))
(sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.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 #s(literal 1 binary64) (sin.f64 a))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 a)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (sin.f64 b))
(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 -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (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 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
#s(literal 1 binary64)
(*.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 b))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 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) (neg.f64 (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(sin.f64 a)
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(approx (* r (tan b)) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64) r) b)))
#s(approx (* r (tan b)) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64) r) b))
(.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64) r) b)
(.f64 b (fma.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64) r))
(fma.f64 b r (.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) b))
(fma.f64 b r (.f64 b (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64))))
(fma.f64 r b (.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) b))
(fma.f64 r b (.f64 b (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64))))
(+.f64 (.f64 b r) (.f64 (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64)) b))
(+.f64 (.f64 b r) (.f64 b (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (-.f64 (.f64 r r) (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 r (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (.f64 r r))) (neg.f64 (-.f64 (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64)) r)))
(/.f64 (neg.f64 (+.f64 (pow.f64 r #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 r r (-.f64 (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (.f64 r (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 (.f64 b b) r) #s(literal 3 binary64)) (pow.f64 r #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (-.f64 (.f64 r r) (.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) r)))))
(/.f64 (-.f64 (.f64 r r) (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64))) (-.f64 r (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (.f64 r r)) (-.f64 (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64)) r))
(/.f64 (+.f64 (pow.f64 r #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 3 binary64))) (fma.f64 r r (-.f64 (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (.f64 r (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64))))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 (.f64 b b) r) #s(literal 3 binary64)) (pow.f64 r #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (-.f64 (.f64 r r) (.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) r))))
(fma.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64) r)
(fma.f64 (.f64 (.f64 b b) #s(literal 1/3 binary64)) r r)
(fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 b b) r) r)
(-.f64 r (.f64 #s(literal -1/3 binary64) (.f64 (*.f64 b b) r)))
(+.f64 (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64)) r)
(+.f64 r (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64)))
#s(literal 1/3 binary64)
(.f64 (.f64 b b) r)
(.f64 b (.f64 b r))
(.f64 r (.f64 b b))
(*.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 (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 (.f64 #s(literal -1 binary64) r) (.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
(/.f64 (.f64 #s(literal 1 binary64) r) (.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) (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))) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (sin.f64 a)))) (.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (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))))))
(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 b)) (sin.f64 a)))
(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 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.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 b)) (sin.f64 a)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(/.f64 (neg.f64 (-.f64 (.f64 a a) (.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (neg.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64)))) (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 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (.f64 b b) (.f64 a b))))
(+.f64 a b)
(+.f64 b a)
(.f64 r (/.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (neg.f64 #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 a)))))
(/.f64 (neg.f64 (neg.f64 (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) r))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (neg.f64 #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 a))))))
(/.f64 (neg.f64 (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) r)) (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (neg.f64 #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 a)))))
(/.f64 (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) r) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (neg.f64 #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 a))))
(.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) r)
(.f64 r #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.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)))
(fma.f64 #s(literal 1 binary64) b (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) b))
(fma.f64 b #s(literal 1 binary64) (.f64 b (.f64 (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b)))
(+.f64 (.f64 b #s(literal 1 binary64)) (.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) b) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) b) b) b))
(/.f64 (neg.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)))) (neg.f64 (-.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 (neg.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))) (neg.f64 (-.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 (neg.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64))))) (neg.f64 (+.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 (neg.f64 (fma.f64 (pow.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.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)) (-.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))))))
(/.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) (.f64 (pow.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 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 (fma.f64 (pow.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 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 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 2 binary64)) #s(literal 1/36 binary64))) (neg.f64 (fma.f64 (*.f64 b b) #s(literal 1/120 binary64) #s(literal 1/6 binary64))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) #s(literal 1/1728000 binary64)) #s(literal 1/216 binary64))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 2 binary64)) (+.f64 #s(literal 1/36 binary64) (.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 2 binary64)) #s(literal 1/36 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/120 binary64) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) #s(literal 1/1728000 binary64)) #s(literal 1/216 binary64)) (+.f64 (pow.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 2 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 b b) #s(literal 1/120 binary64))
(.f64 #s(literal 1/120 binary64) (.f64 b b))
(.f64 b (.f64 b #s(literal 1/120 binary64)))
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) 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) #s(approx (/ 1 (pow (sin b) -1)) b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b)) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) 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) #s(approx (/ 1 (pow (sin b) -1)) b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b))))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 a)))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 a)))
(*.f64 (sin.f64 a) #s(approx (/ 1 (pow (sin b) -1)) b))
(*.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))
#s(approx (/ 1 (pow (sin b) -1)) b)
(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))))
(/.f64 (neg.f64 (.f64 (sin.f64 b) r)) (neg.f64 (fma.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
(/.f64 (.f64 (sin.f64 b) r) (fma.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) #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) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(-.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) (.f64 (sin.f64 a) (sin.f64 b)))
(+.f64 (.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(.f64 (cos.f64 a) #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))))
(.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))) (cos.f64 a))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64))))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (*.f64 b b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b))))
(/.f64 (fma.f64 (pow.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b)) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (*.f64 b b))))))
(fma.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) b) b #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))
(fma.f64 (.f64 b b) (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 b b)) (-.f64 (.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64))))
(+.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (*.f64 b b)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (*.f64 b b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/8 binary64))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 (pow.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)))))
(-.f64 (.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64))
(.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b)
(.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b))
(.f64 (.f64 b b) (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))
(fma.f64 (.f64 b b) #s(literal 1/24 binary64) (.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) (*.f64 b b)))
(fma.f64 (.f64 b b) #s(literal 1/24 binary64) (.f64 (.f64 b b) (.f64 (*.f64 b b) #s(literal -1/720 binary64))))
(fma.f64 #s(literal 1/24 binary64) (.f64 b b) (.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) (*.f64 b b)))
(fma.f64 #s(literal 1/24 binary64) (.f64 b b) (.f64 (.f64 b b) (.f64 (*.f64 b b) #s(literal -1/720 binary64))))
(+.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) (.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) (.f64 b b)))
(+.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) (.f64 (.f64 b b) (.f64 (.f64 b b) #s(literal -1/720 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/576 binary64) (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/24 binary64) (.f64 (.f64 b b) #s(literal -1/720 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64)) #s(literal 1/576 binary64))) (neg.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/13824 binary64) (.f64 (pow.f64 b #s(literal 6 binary64)) #s(literal -1/373248000 binary64)))) (neg.f64 (+.f64 #s(literal 1/576 binary64) (-.f64 (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 b b) #s(literal -1/720 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 b #s(literal 6 binary64)) #s(literal -1/373248000 binary64) #s(literal 1/13824 binary64))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/576 binary64) (.f64 (.f64 (*.f64 b b) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))))))
(/.f64 (-.f64 #s(literal 1/576 binary64) (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/24 binary64) (.f64 (.f64 b b) #s(literal -1/720 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64)) #s(literal 1/576 binary64)) (-.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))
(/.f64 (+.f64 #s(literal 1/13824 binary64) (.f64 (pow.f64 b #s(literal 6 binary64)) #s(literal -1/373248000 binary64))) (+.f64 #s(literal 1/576 binary64) (-.f64 (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 b b) #s(literal -1/720 binary64))))))
(/.f64 (fma.f64 (pow.f64 b #s(literal 6 binary64)) #s(literal -1/373248000 binary64) #s(literal 1/13824 binary64)) (+.f64 (pow.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/576 binary64) (.f64 (.f64 (*.f64 b b) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))
(fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 b b) #s(literal 1/24 binary64))
(fma.f64 b (*.f64 b #s(literal -1/720 binary64)) #s(literal 1/24 binary64))
(-.f64 #s(literal 1/24 binary64) (.f64 #s(literal 1/720 binary64) (.f64 b b)))
(+.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))
(+.f64 #s(literal 1/24 binary64) (.f64 (.f64 b b) #s(literal -1/720 binary64)))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (sin.f64 a))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 a)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.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 b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (tan b)) (*.f64 (tan.f64 b) r))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) r) b))
#s(approx (+ (* 1/3 (* (* b b) r)) r) (.f64 (fma.f64 (.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) r))
#s(approx (* (* b b) r) (.f64 (.f64 b b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.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) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (.f64 (neg.f64 b) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 b b)) #s(literal 1 binary64)) r)))
#s(approx (+ (* 1/3 (* (* b b) r)) r) (neg.f64 (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 b b)) #s(literal 1 binary64)) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) a (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 (.f64 a a) #s(literal 1/24 binary64)) (cos.f64 b) (.f64 #s(literal -1/2 binary64) (cos.f64 b))) (.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 a a) #s(literal -1/720 binary64)) (cos.f64 b) (.f64 #s(literal 1/24 binary64) (cos.f64 b))) (.f64 a a) (.f64 #s(literal -1/2 binary64) (cos.f64 b))) (.f64 a a) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (.f64 (.f64 a a) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 a a) #s(literal -1/720 binary64) #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) #s(literal 1/120 binary64)) (sin.f64 b) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 a a)) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (sin.f64 b))) (.f64 a a) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.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 (.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 (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) a (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) a (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (.f64 #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) #s(literal 1/120 binary64)) (sin.f64 b) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 a a)) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (sin.f64 b))) (.f64 a a) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (.f64 (tan.f64 b) r) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (.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))))) (sin.f64 b)) (cos.f64 b))))) (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 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) a (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (.f64 #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) #s(literal 1/120 binary64)) (sin.f64 b) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 a a)) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (sin.f64 b))) (.f64 a a) (.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 b b) r) r) b))
#s(approx (* (sin b) r) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 (.f64 b b) r) #s(literal 1/120 binary64))) (*.f64 b b) r) b))
#s(approx (* (sin b) r) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/120 binary64) r)) (.f64 b b) (.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #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)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 b b)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (.f64 #s(literal -1/2 binary64) (cos.f64 a))) (.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (.f64 (cos.f64 a) #s(literal 1/24 binary64))) (.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 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) 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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (fma.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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #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 (/ 1 (sin b)) (pow.f64 b #s(literal -1 binary64)))
#s(approx (/ 1 (sin b)) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (sin b)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (.f64 b b) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (sin b)) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (.f64 b b) #s(literal 7/360 binary64)) (.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64) 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 (fma.f64 #s(literal 17/315 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 2/15 binary64) r)) (.f64 b b) (.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (*.f64 b r))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (.f64 (fma.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64) r) b))
#s(approx (+ (* 1/3 (* (* b b) r)) r) r)
#s(approx (+ (* 1/3 (* (* b b) r)) r) (fma.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64) r))
#s(approx (* b b) (*.f64 b b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 b b) r) r) b))
#s(approx (* (sin b) r) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 (.f64 b b) r) #s(literal 1/120 binary64))) (*.f64 b b) r) b))
#s(approx (* (sin b) r) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/120 binary64) r)) (.f64 b b) (.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) b)
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 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 (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* b b) 1/120) 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 (- (* (* b b) 1/120) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* (* b b) 1/120) 1/6) (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (* (* b b) 1/120) (.f64 (.f64 b b) #s(literal 1/120 binary64)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (fma.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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #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)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64)))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (-.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (-.f64 (.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b) #s(literal 1/2 binary64)))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) (.f64 (.f64 b b) #s(literal 1/24 binary64)))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) (.f64 (.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) b) b))
#s(approx (+ (* (* b b) -1/720) 1/24) #s(literal 1/24 binary64))
#s(approx (+ (* (* b b) -1/720) 1/24) (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (.f64 (fma.f64 (fma.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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (/ 1 (sin b)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) r) #s(literal 1/3 binary64)))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (.f64 (fma.f64 #s(literal 1/3 binary64) r (/.f64 r (.f64 b b))) (pow.f64 b #s(literal 3 binary64))))
#s(approx (+ (* 1/3 (* (* b b) r)) r) (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64)))
#s(approx (+ (* 1/3 (* (* b b) r)) r) (.f64 (fma.f64 #s(literal 1/3 binary64) r (/.f64 r (.f64 b b))) (*.f64 b b)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 5 binary64)) #s(literal 1/120 binary64)))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (.f64 (-.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (pow.f64 b #s(literal 5 binary64))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (.f64 (-.f64 (+.f64 (pow.f64 b #s(literal -4 binary64)) #s(literal 1/120 binary64)) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (pow.f64 b #s(literal 5 binary64))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1/120 binary64)))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64)))))
#s(approx (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) (.f64 (-.f64 (+.f64 (pow.f64 b #s(literal -4 binary64)) #s(literal 1/120 binary64)) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (- (* (* b b) 1/120) 1/6) (.f64 (.f64 b b) #s(literal 1/120 binary64)))
#s(approx (- (* (* b b) 1/120) 1/6) (.f64 (-.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))) (*.f64 b b)))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (*.f64 (pow.f64 b #s(literal 6 binary64)) #s(literal -1/720 binary64)))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64))))))
#s(approx (+ (* (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (* b b)) 1) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (-.f64 (fma.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/24 binary64) (pow.f64 b #s(literal -6 binary64))) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64))))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal -1/720 binary64)))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (pow.f64 b #s(literal 4 binary64))))
#s(approx (- (* (+ (* (* b b) -1/720) 1/24) (* b b)) 1/2) (.f64 (-.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal -1/720 binary64)))
#s(approx (* (+ (* (* b b) -1/720) 1/24) (* b b)) (.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (pow.f64 b #s(literal 4 binary64))))
#s(approx (+ (* (* b b) -1/720) 1/24) (.f64 (.f64 b b) #s(literal -1/720 binary64)))
#s(approx (+ (* (* b b) -1/720) 1/24) (.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (*.f64 b b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/3 binary64) r (neg.f64 (/.f64 r (.f64 b b))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (-.f64 a (neg.f64 b))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (neg.f64 (.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64)) #s(literal 1/120 binary64)) (pow.f64 b #s(literal 5 binary64)))))
#s(approx (* (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) (neg.f64 (.f64 (-.f64 (-.f64 (.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64)) #s(literal 1/120 binary64)) (pow.f64 b #s(literal -4 binary64))) (pow.f64 b #s(literal 5 binary64)))))

eval109.0ms (2.2%)

Memory: 44.4MiB live, 221.3MiB allocated; 35ms collecting garbage
Compiler: Compiled 25 453 to 3 157 computations (87.6% saved)

prune149.0ms (3%)

Memory

17.5MiB live, 248.0MiB allocated; 79ms collecting garbage

Pruning

77 alts after pruning (70 fresh and 7 done)

	Pruned	Kept	Total
New	704	19	723
Fresh	8	51	59
Picked	3	2	5
Done	0	5	5
Total	715	77	792

Accuracy

99.8%

Counts

792 → 77

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.3%	(/.f64 (/.f64 (.f64 r #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))))
	17.6%	(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
	62.3%	(/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
	53.2%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
	34.5%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
	99.3%	(/.f64 (.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	75.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (cos.f64 (+.f64 a b)))
	50.0%	(/.f64 (.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
	47.1%	(/.f64 (.f64 r (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	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.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
	99.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.4%	(/.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 a)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a))))
	77.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))) (sin.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.3%	(/.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 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
	56.6%	(/.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)))))
	61.3%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) (sin.f64 a))))
	53.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) #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)))) (.f64 (sin.f64 b) (sin.f64 a))))
	53.4%	(/.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))))
	50.0%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.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.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #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))) (*.f64 (sin.f64 b) (sin.f64 a))))
	57.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a))))
	57.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (sin.f64 a))))
	55.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	36.1%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	29.8%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 a a) (*.f64 b b)) (-.f64 a b))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.7%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
	34.8%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
✓	17.6%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
	17.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
✓	56.4%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	54.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	50.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 #s(approx (- ( (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1/2 binary64) b)) b (cos.f64 a))))
	31.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ ( (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
	49.3%	(/.f64 (.f64 r #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	13.9%	(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
	50.1%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	49.2%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 b b)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (sin.f64 a))))
	49.3%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
	49.3%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	49.4%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	49.3%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))))
	49.4%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	49.3%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 #s(approx (cos b) (fma.f64 #s(literal -1/2 binary64) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))))
	49.7%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))))
	49.7%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 #s(approx (- (* (* b b) 1/120) 1/6) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))))
	52.3%	(/.f64 (.f64 r #s(approx (sin b) #s(approx ( (+ (* (- (* (* b b) 1/120) 1/6) (* b b)) 1) b) b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 #s(approx (/ 1 (pow (sin b) -1)) b) (sin.f64 a))))
	49.4%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
	30.4%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
	75.1%	(/.f64 (.f64 #s(literal 1 binary64) r) (.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) (cos.f64 (+.f64 a b))))
	50.0%	(/.f64 #s(approx (* (sin b) r) (.f64 b r)) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 b b)) #s(literal 1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	49.8%	(/.f64 #s(approx (* r (sin b)) (.f64 (fma.f64 (.f64 (.f64 b b) r) #s(literal -1/6 binary64) r) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
	75.2%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
	49.0%	(.f64 r (/.f64 #s(approx (/ 1 (pow (sin b) -1)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
	30.9%	#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (/.f64 (.f64 b r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
	49.7%	#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (/ 1 (pow (sin b) -1)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
	53.8%	#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))))
	30.9%	#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)))))))
	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓	56.4%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	30.1%	#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))))
	30.2%	#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))))
	30.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r #s(approx (tan b) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
✓	30.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
✓	30.3%	#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)))
	11.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (.f64 #s(approx (+ ( 1/3 (* (* b b) r)) r) (.f64 (fma.f64 #s(literal 1/3 binary64) r (/.f64 r (.f64 b b))) (*.f64 b b))) b)))
	14.2%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (.f64 #s(approx (+ ( 1/3 (* (* b b) r)) r) (.f64 (.f64 (*.f64 b b) r) #s(literal 1/3 binary64))) b)))
	14.2%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) #s(approx (* (+ (* 1/3 (* (* b b) r)) r) b) (.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) r) #s(literal 1/3 binary64)))))

Compiler

Compiled 5 014 to 2 014 computations (59.8% saved)

regimes175.0ms (3.5%)

Memory

-14.4MiB live, 179.1MiB allocated; 84ms collecting garbage

Counts

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes96.0ms (1.9%)

Memory

16.5MiB live, 160.8MiB allocated; 7ms collecting garbage

Counts

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

Outputs

(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))) (sin.f64 a))))

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes108.0ms (2.1%)

Memory

-10.5MiB live, 128.9MiB allocated; 6ms collecting garbage

Counts

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

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

Calls

4 calls:

39.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
22.0ms	b
22.0ms	r
21.0ms	a

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes39.0ms (0.8%)

Memory

-7.3MiB live, 41.9MiB allocated; 5ms collecting garbage

Counts

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes36.0ms (0.7%)

Memory

-12.3MiB live, 34.5MiB allocated; 2ms collecting garbage

Counts

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

Outputs

#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.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 r (tan.f64 b)))

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
59.7%	2	`r`
75.4%	3	`b`
60.6%	3	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
75.3%	3	`a`

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes14.0ms (0.3%)

Memory

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

Counts

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes10.0ms (0.2%)

Memory

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

Accuracy

Total -15.9b remaining (-35.8%)

Threshold costs -15.9b (-35.8%)

Counts

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

bsearch30.0ms (0.6%)

Memory

-6.3MiB live, 40.3MiB allocated; 2ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	1.272013532075396e-8	9.046475832535792e-5
11.0ms	-1.1067924274621257	-0.7575971758251097

Samples

14.0ms	109×	1	valid
5.0ms	83×	0	valid

Compiler

Compiled 372 to 314 computations (15.6% saved)

Precisions

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

ival-cos: 6.0ms (43.8% of total)

adjust: 2.0ms (14.6% of total)

ival-sin: 2.0ms (14.6% of total)

ival-mult!: 2.0ms (14.6% of total)

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

ival-div!: 1.0ms (7.3% of total)

derivations204.0ms (4%)

Memory

7.6MiB live, 194.0MiB allocated; 22ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 145 to 51 computations (64.8% saved)

preprocess84.0ms (1.7%)

Memory: -28.8MiB live, 75.0MiB allocated; 32ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 598 to 306 computations (48.8% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze250.0ms (5%)

sample1.9s (37.8%)

explain151.0ms (3%)

preprocess190.0ms (3.8%)

eval0.0ms (0%)

prune0.0ms (0%)

series35.0ms (0.7%)

rewrite193.0ms (3.8%)

eval10.0ms (0.2%)

prune15.0ms (0.3%)

series91.0ms (1.8%)

rewrite288.0ms (5.7%)

eval64.0ms (1.3%)

prune69.0ms (1.4%)

series86.0ms (1.7%)

rewrite226.0ms (4.5%)

eval71.0ms (1.4%)

prune69.0ms (1.4%)

series43.0ms (0.9%)

rewrite224.0ms (4.4%)

eval109.0ms (2.2%)

prune149.0ms (3%)

regimes175.0ms (3.5%)

regimes96.0ms (1.9%)

regimes108.0ms (2.1%)

regimes39.0ms (0.8%)

regimes36.0ms (0.7%)

regimes14.0ms (0.3%)

regimes10.0ms (0.2%)

bsearch30.0ms (0.6%)

derivations204.0ms (4%)

preprocess84.0ms (1.7%)

end0.0ms (0%)

Profiling