Metrics for rsin A (should all be same)

start0.0ms (0%)

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

analyze401.0ms (7.4%)

Memory

-28.1MiB live, 367.3MiB allocated; 135ms 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.5s (28.4%)

Memory

44.5MiB live, 1 778.4MiB allocated; 333ms collecting garbage

Samples

1.0s	6 015×	1	valid
204.0ms	2 241×	0	valid

Precisions

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

ival-cos: 307.0ms (33.2% of total)

ival-sin: 199.0ms (21.5% of total)

adjust: 181.0ms (19.6% of total)

ival-div: 80.0ms (8.7% of total)

ival-add: 77.0ms (8.3% of total)

ival-mult: 77.0ms (8.3% of total)

ival-assert: 3.0ms (0.3% of total)

Bogosity

explain210.0ms (3.9%)

Memory

7.6MiB live, 145.9MiB allocated; 17ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
71	136	(-6.235559000289053e+114 1.5801618044283036e-300 -7.624010588913587e+138)	-	`(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	207	0

Confusion

	Predicted +	Predicted -
+	70	0
-	137	49

Precision

0.33816425120772947

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	70	0	0
-	137	0	49

Precision?

0.33816425120772947

Recall?

1.0

Freqs

test

number	freq
0	49
1	207

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

116.0ms	402×	1	valid
8.0ms	110×	0	valid

Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions

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

ival-add: 49.0ms (51.2% of total)

ival-cos: 17.0ms (17.8% of total)

ival-sin: 11.0ms (11.5% of total)

adjust: 10.0ms (10.5% of total)

ival-div: 4.0ms (4.2% of total)

ival-mult: 4.0ms (4.2% of total)

ival-true: 1.0ms (1% of total)

ival-assert: 0.0ms (0% of total)

preprocess268.0ms (4.9%)

Memory

-0.9MiB live, 196.7MiB allocated; 49ms 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.0MiB live, 0.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Compiler

Compiled 9 to 8 computations (11.1% saved)

series71.0ms (1.3%)

Memory

0.7MiB live, 58.6MiB allocated; 10ms 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
56.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	a	@	0	((/ (* 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)

rewrite216.0ms (4%)

Memory

-1.3MiB live, 231.0MiB allocated; 29ms 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: 17.4MiB live, 17.4MiB allocated; 0ms collecting garbage
Compiler: Compiled 1 566 to 357 computations (77.2% saved)

prune26.0ms (0.5%)

Memory

-8.3MiB live, 35.6MiB allocated; 6ms collecting garbage

Pruning

23 alts after pruning (22 fresh and 1 done)

	Pruned	Kept	Total
New	57	22	79
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	57	23	80

Accuracy

99.8%

Counts

80 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	76.7%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	38.8%	(/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (/.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))))
	35.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	44.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))))
✓	76.8%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	60.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
▶	57.9%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	54.0%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
	53.9%	(/.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.0%	(/.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.0%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	55.1%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	49.0%	(/.f64 (.f64 r #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
	49.3%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
	76.8%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	54.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))))
	49.2%	#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))
▶	58.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	49.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))

Compiler

Compiled 855 to 570 computations (33.3% saved)

series79.0ms (1.5%)

Memory

-4.2MiB live, 143.3MiB allocated; 22ms collecting garbage

Counts

33 → 217

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)) (cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))))
(cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) (/.f64 (.f64 b b) (-.f64 a b))))
(-.f64 (/.f64 (.f64 a a) (-.f64 a b)) (/.f64 (.f64 b b) (-.f64 a b)))
(/.f64 (*.f64 a a) (-.f64 a b))
(*.f64 a a)
(-.f64 a b)
(/.f64 (*.f64 b b) (-.f64 a b))
(*.f64 b 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))))
#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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (- (/ (pow a 2) (- a b)) (/ (pow b 2) (- 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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (neg (* -1 b))))))
#s(approx (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (+ (/ (* a (* r (* (sin b) (sin (neg (* -1 b)))))) (pow (cos (neg (* -1 b))) 2)) (/ (* r (sin b)) (cos (neg (* -1 b)))))))
#s(approx (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (sin (neg (* -1 b))) 2))) (pow (cos (neg (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (cos (neg (* -1 b)))))))) (* -1 (/ (* r (* (sin b) (sin (neg (* -1 b))))) (pow (cos (neg (* -1 b))) 2))))) (/ (* r (sin b)) (cos (neg (* -1 b)))))))
#s(approx (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (sin b) (sin (neg (* -1 b))))) (pow (cos (neg (* -1 b))) 2))) (+ (* 1/6 (/ (* r (* (sin b) (sin (neg (* -1 b))))) (pow (cos (neg (* -1 b))) 2))) (/ (* (sin (neg (* -1 b))) (+ (* -1 (/ (* r (* (sin b) (pow (sin (neg (* -1 b))) 2))) (pow (cos (neg (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (cos (neg (* -1 b))))))) (cos (neg (* -1 b)))))))) (+ (* -1 (/ (* r (* (sin b) (pow (sin (neg (* -1 b))) 2))) (pow (cos (neg (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (cos (neg (* -1 b)))))))) (* -1 (/ (* r (* (sin b) (sin (neg (* -1 b))))) (pow (cos (neg (* -1 b))) 2))))) (/ (* r (sin b)) (cos (neg (* -1 b)))))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (cos (neg (* -1 b)))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (+ (cos (neg (* -1 b))) (* -1 (* a (sin (neg (* -1 b))))))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (+ (cos (neg (* -1 b))) (* a (- (* -1/2 (* a (cos (neg (* -1 b))))) (sin (neg (* -1 b))))))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (+ (cos (neg (* -1 b))) (* a (- (* a (+ (* -1/2 (cos (neg (* -1 b)))) (* 1/6 (* a (sin (neg (* -1 b))))))) (sin (neg (* -1 b))))))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 b))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (- a (* -1 b))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* -1 (/ (pow a 2) b))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* (pow a 2) (- (* -1 (/ a (pow b 2))) (/ 1 b)))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* (pow a 2) (- (* a (- (* -1 (/ a (pow b 3))) (/ 1 (pow b 2)))) (/ 1 b)))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* (pow a 2) (- (* a (- (* a (- (* -1 (/ a (pow b 4))) (/ 1 (pow b 3)))) (/ 1 (pow b 2)))) (/ 1 b)))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (- a b) #s(hole binary64 (* -1 b)))
#s(approx (- a b) #s(hole binary64 (- a b)))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* -1 b)))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (+ (* -1 a) (* -1 b))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (+ (* -1 b) (* a (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (+ (* -1 b) (* a (- (* a (- (* -1 (/ a (pow b 2))) (/ 1 b))) 1)))))
#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 (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (cos (- (/ (pow a 2) (- a b)) (/ (pow b 2) (- a b))))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 a))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (* a (- (+ 1 (* -1 (/ (+ (* -1 (pow b 2)) (pow b 2)) (pow a 2)))) (* -1 (/ b a))))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 a))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* a (- (+ 1 (/ (pow b 2) (pow a 2))) (* -1 (/ b a))))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* a (- (+ 1 (/ (pow b 3) (pow a 3))) (+ (* -1 (/ b a)) (* -1 (/ (pow b 2) (pow a 2))))))))
#s(approx (- a b) #s(hole binary64 a))
#s(approx (- a b) #s(hole binary64 (* a (+ 1 (* -1 (/ b a))))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (/ (pow b 2) a)))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (/ (+ (/ (pow b 3) a) (pow b 2)) a)))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (/ (- (+ (/ (pow b 4) (pow a 2)) (pow b 2)) (* -1 (/ (pow b 3) a))) a)))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (/ (- (+ (/ (pow b 5) (pow a 3)) (pow b 2)) (+ (* -1 (/ (pow b 3) a)) (* -1 (/ (pow b 4) (pow a 2))))) a)))
#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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (neg (+ (* -1 (/ (pow b 2) (+ b (* -1 a)))) (/ (pow a 2) (+ b (* -1 a)))))))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (cos (neg (+ (* -1 (/ (pow b 2) (+ b (* -1 a)))) (/ (pow a 2) (+ b (* -1 a))))))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (/ (pow b 2) a) (* -1 b)) a)) 1)))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow b 3) a)) (pow b 2)) a)) (* -1 b)) a)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* a (- (/ b a) 1)))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (pow b 3) a)) (* -1 (pow b 2))) a))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (/ (pow b 4) a) (pow b 3)) a)) (* -1 (pow b 2))) a))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow b 5) a)) (* -1 (pow b 4))) a)) (pow b 3)) a)) (* -1 (pow b 2))) 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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- 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 a) (- a b)) (/ (* b b) (- 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 (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (cos a)))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (+ a b)))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (+ a (* b (+ 1 (/ b a))))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (+ a (* b (+ 1 (* b (+ (/ 1 a) (/ b (pow a 2)))))))))
#s(approx (- a b) #s(hole binary64 (+ a (* -1 b))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* (pow b 2) (+ (/ 1 a) (/ b (pow a 2))))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* (pow b 2) (+ (* b (+ (/ 1 (pow a 2)) (/ b (pow a 3)))) (/ 1 a)))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* b (+ (/ 1 (pow a 3)) (/ b (pow a 4)))) (/ 1 (pow a 2)))) (/ 1 a)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#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 (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (* b (+ 1 (+ (* -1 (/ (pow a 2) (pow b 2))) (+ (/ a b) (/ (pow a 2) (pow b 2))))))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (/ (+ (* -1 (/ (pow a 3) b)) (* -1 (pow a 2))) b)))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (/ (- (+ (* -1 (/ (pow a 4) (pow b 2))) (* -1 (pow a 2))) (/ (pow a 3) b)) b)))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (/ (- (+ (* -1 (/ (pow a 5) (pow b 3))) (* -1 (pow a 2))) (+ (/ (pow a 3) b) (/ (pow a 4) (pow b 2)))) b)))
#s(approx (- a b) #s(hole binary64 (* b (- (/ a b) 1))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* b (- (* -1 (/ (pow a 2) (pow b 2))) (+ 1 (/ a b))))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* b (- (* -1 (/ (pow a 3) (pow b 3))) (+ 1 (+ (/ a b) (/ (pow a 2) (pow b 2))))))))
#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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (- (/ (pow a 2) (+ a (* -1 b))) (/ (pow b 2) (+ a (* -1 b))))))))
#s(approx (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) #s(hole binary64 (cos (- (/ (pow a 2) (+ a (* -1 b))) (/ (pow b 2) (+ a (* -1 b)))))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* -1 (/ (+ (* -1 (pow a 2)) (pow a 2)) b))) b)) 1)))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* -1 (/ (+ (/ (pow a 3) b) (pow a 2)) b))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (pow a 4) b)) (pow a 3)) b)) (pow a 2)) b))))
#s(approx (/ (* a a) (- a b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (pow a 5) b) (* -1 (pow a 4))) b)) (pow a 3)) b)) (pow a 2)) b))))
#s(approx (- a b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ a b)))))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* -1 (/ (pow a 2) b)) a) b)))))))
#s(approx (/ (* b b) (- a b)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (pow a 3) b) (* -1 (pow a 2))) b)) 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
15.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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (/ (* b b) (- a b)) (* b b) (/ (* 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)
14.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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (/ (* b b) (- a b)) (* b b) (/ (* 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)
7.0ms	a	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (/ (* b b) (- a b)) (* b b) (/ (* 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)
7.0ms	r	@	0	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (/ (* b b) (- a b)) (* b b) (/ (* 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)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (/ (* b b) (- a b)) (* b b) (/ (* 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)

rewrite286.0ms (5.2%)

Memory

-35.3MiB live, 239.5MiB allocated; 101ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	967	5903
0	1016	4893
1	5929	4893
0	8348	4719

Stop Event

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

Counts

250 → 394

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

eval87.0ms (1.6%)

Memory: -18.7MiB live, 127.3MiB allocated; 25ms collecting garbage
Compiler: Compiled 13 138 to 2 091 computations (84.1% saved)

prune48.0ms (0.9%)

Memory

40.2MiB live, 129.4MiB allocated; 11ms collecting garbage

Pruning

47 alts after pruning (43 fresh and 4 done)

	Pruned	Kept	Total
New	434	32	466
Fresh	6	11	17
Picked	2	3	5
Done	0	1	1
Total	442	47	489

Accuracy

99.8%

Counts

489 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	76.7%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	38.8%	(/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
▶	99.6%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.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)))))
	76.8%	(/.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)))) (cos.f64 (-.f64 b a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	61.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	61.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
	53.9%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 b) (sin.f64 a))))
▶	59.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.0%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	35.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.4%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	29.5%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) #s(approx (- a b) a)))))
	28.5%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) #s(approx (/ (* b b) (- a b)) (/.f64 (fma.f64 b b (/.f64 (pow.f64 b #s(literal 3 binary64)) a)) a)))))
	52.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) #s(approx (/ (* b b) (- a b)) (*.f64 #s(literal -1 binary64) (+.f64 a b))))))
▶	29.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) (/.f64 (*.f64 b b) (-.f64 a b)))))
	76.9%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (*.f64 b (/.f64 b (-.f64 a b))))))
	45.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 #s(approx (/ ( a a) (- a b)) (fma.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b a)) (/.f64 (*.f64 b b) (-.f64 a b)))))
	50.2%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 #s(approx (/ ( a a) (- a b)) (+.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))))
✓	76.8%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	60.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	54.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) a)))
✓	57.9%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	51.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (- (/ ( a a) (- a b)) (/ (* b b) (- a b)))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	55.1%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (- (/ ( a a) (- a b)) (/ (* b b) (- a b)))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	50.1%	(/.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))))
	49.8%	(/.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))))
	48.3%	(/.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))) (fma.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (.f64 (-.f64 (.f64 (.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (-.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)))))))
	30.9%	(/.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 (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)))
▶	76.8%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	57.9%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b))))
	54.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))))
	49.2%	#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))
	31.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)))))))
	32.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
	32.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓	58.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
▶	30.5%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
	49.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
	30.1%	#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 142 to 1 378 computations (35.7% saved)

series101.0ms (1.9%)

Memory

-11.7MiB live, 93.6MiB allocated; 14ms collecting garbage

Counts

33 → 241

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
52.0ms	a	@	inf	((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (neg b) (/ (* b b) (- a b)) (* b b) (- a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
12.0ms	r	@	0	((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (neg b) (/ (* b b) (- a b)) (* b b) (- a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
6.0ms	r	@	-inf	((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (neg b) (/ (* b b) (- a b)) (* b b) (- a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
6.0ms	r	@	inf	((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (neg b) (/ (* b b) (- a b)) (* b b) (- a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
5.0ms	b	@	-inf	((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b))))) (cos (- (/ (* a a) (- a b)) (/ (* b b) (- a b)))) (- (/ (* a a) (- a b)) (/ (* b b) (- a b))) (/ (* a a) (- a b)) (* a a) (- a b) (neg b) (/ (* b b) (- a b)) (* b b) (- a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))

rewrite266.0ms (4.9%)

Memory

7.7MiB live, 281.6MiB allocated; 34ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1039	7234
0	1079	5878
1	6276	5878
0	8170	5661

Stop Event

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

Counts

274 → 447

Calls

Call 1

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

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

eval107.0ms (2%)

Memory: -15.6MiB live, 128.6MiB allocated; 40ms collecting garbage
Compiler: Compiled 12 075 to 1 897 computations (84.3% saved)

prune129.0ms (2.4%)

Memory

-8.8MiB live, 135.2MiB allocated; 16ms collecting garbage

Pruning

61 alts after pruning (54 fresh and 7 done)

	Pruned	Kept	Total
New	420	25	445
Fresh	9	29	38
Picked	2	3	5
Done	0	4	4
Total	431	61	492

Accuracy

99.8%

Counts

492 → 61

Alt Table

Click to see full alt table

Status	Accuracy	Program
	76.7%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	38.8%	(/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
	99.1%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64)))) (sin.f64 a))))
	77.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (sin.f64 (+.f64 b (PI.f64))) (sin.f64 a))))
✓	99.6%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	61.6%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
	53.9%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 #s(literal -1/2 binary64) (.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.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)))))
	59.1%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
▶	61.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
	35.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
✓	59.1%	(/.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 b)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	55.0%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
	35.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
	35.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.4%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	52.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) #s(approx (/ (* b b) (- a b)) (*.f64 #s(literal -1 binary64) (+.f64 a b))))))
	36.8%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (fma.f64 (-.f64 (.f64 (-.f64 (/.f64 (neg.f64 a) (.f64 b b)) (pow.f64 b #s(literal -1 binary64))) a) #s(literal 1 binary64)) a (neg.f64 b))))))
	13.5%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (/.f64 (fma.f64 b b (/.f64 (pow.f64 b #s(literal 3 binary64)) a)) a)))))
	14.5%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (/.f64 (*.f64 b b) a)))))
	46.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (*.f64 #s(literal -1 binary64) (+.f64 a b))))))
	45.9%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (neg.f64 b)))))
▶	76.9%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (*.f64 b (/.f64 b (-.f64 a b))))))
	29.6%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a #s(approx (- a b) (neg.f64 b)))) (/.f64 (*.f64 b b) (-.f64 a b)))))
	45.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 #s(approx (/ ( a a) (- a b)) (fma.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b a)) (/.f64 (*.f64 b b) (-.f64 a b)))))
	50.2%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 #s(approx (/ ( a a) (- a b)) (+.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))))
✓	76.8%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	60.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	54.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) a)))
✓	57.9%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	51.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	50.1%	(/.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))))
▶	49.8%	(/.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))))
	30.9%	(/.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)))))
	18.7%	(/.f64 (.f64 r #s(approx (sin b) b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) (/.f64 (*.f64 b b) (-.f64 a b)))))
	49.3%	(/.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)))
	59.0%	(.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	46.0%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) (*.f64 b (/.f64 b (-.f64 a b)))))))
	57.9%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b))))
	54.0%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
	53.9%	(.f64 r (/.f64 (sin.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)))))
	49.3%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	49.3%	(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
	54.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))))
	49.2%	#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))
	31.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)))))))
	32.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
	32.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓	58.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
✓	30.5%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
	49.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
▶	30.1%	#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 687 to 1 786 computations (33.5% saved)

series83.0ms (1.5%)

Memory

-8.8MiB live, 137.5MiB allocated; 17ms collecting garbage

Counts

38 → 277

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
34.0ms	r	@	-inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* 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)) (* -1/2 b) -1/2 (/ (* r (sin b)) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b)))))) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b))))) (- (* a (/ a (- a b))) (* b (/ b (- a b)))) (* a (/ a (- a b))) (/ a (- a b)) (- a b) (* b (/ b (- a b))) (/ b (- a b)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (sin b))
9.0ms	b	@	-inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* 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)) (* -1/2 b) -1/2 (/ (* r (sin b)) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b)))))) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b))))) (- (* a (/ a (- a b))) (* b (/ b (- a b)))) (* a (/ a (- a b))) (/ a (- a b)) (- a b) (* b (/ b (- a b))) (/ b (- a b)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (sin b))
7.0ms	a	@	-inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* 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)) (* -1/2 b) -1/2 (/ (* r (sin b)) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b)))))) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b))))) (- (* a (/ a (- a b))) (* b (/ b (- a b)))) (* a (/ a (- a b))) (/ a (- a b)) (- a b) (* b (/ b (- a b))) (/ b (- a b)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (sin b))
7.0ms	r	@	inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* 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)) (* -1/2 b) -1/2 (/ (* r (sin b)) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b)))))) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b))))) (- (* a (/ a (- a b))) (* b (/ b (- a b)))) (* a (/ a (- a b))) (/ a (- a b)) (- a b) (* b (/ b (- a b))) (/ b (- a b)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (sin b))
6.0ms	r	@	0	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin a) a (neg (sin b)) (* (cos a) (cos b)) (cos a) (cos b) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (* (+ (* 1/3 (* (* b b) r)) r) b) (+ (* 1/3 (* (* b b) r)) r) 1/3 (* (* b b) r) (* b b) (/ (* 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)) (* -1/2 b) -1/2 (/ (* r (sin b)) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b)))))) (cos (- (* a (/ a (- a b))) (* b (/ b (- a b))))) (- (* a (/ a (- a b))) (* b (/ b (- a b)))) (* a (/ a (- a b))) (/ a (- a b)) (- a b) (* b (/ b (- a b))) (/ b (- a b)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (sin b))

rewrite225.0ms (4.1%)

Memory

20.7MiB live, 338.5MiB allocated; 45ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1135	7809
0	1192	6525
1	6807	6525
0	8689	6299

Stop Event

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

Counts

315 → 536

Calls

Call 1

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

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

eval100.0ms (1.8%)

Memory: 2.8MiB live, 160.0MiB allocated; 25ms collecting garbage
Compiler: Compiled 16 406 to 2 511 computations (84.7% saved)

prune78.0ms (1.4%)

Memory

-0.3MiB live, 143.3MiB allocated; 11ms collecting garbage

Pruning

70 alts after pruning (62 fresh and 8 done)

	Pruned	Kept	Total
New	539	24	563
Fresh	11	38	49
Picked	3	2	5
Done	1	6	7
Total	554	70	624

Accuracy

99.8%

Counts

624 → 70

Alt Table

Click to see full alt table

Status	Accuracy	Program
	76.7%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	38.8%	(/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
	99.1%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (.f64 (cos.f64 b) (sin.f64 (PI.f64)))) (*.f64 (cos.f64 a) (cos.f64 b))))
	77.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (sin.f64 (+.f64 b (PI.f64))) (.f64 (cos.f64 a) (cos.f64 b))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
	53.9%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 b))))
	59.1%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx ( (cos a) (cos b)) (cos.f64 b))))
	55.0%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx ( (cos a) (cos b)) (cos.f64 a))))
✓	99.6%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	61.6%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 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)))))
	59.1%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	50.0%	(/.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 #s(approx (sin b) b) (sin.f64 a))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
	35.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
	55.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
	35.4%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
	35.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	34.6%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.4%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	52.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) (-.f64 a b)) #s(approx (/ (* b b) (- a b)) (*.f64 #s(literal -1 binary64) (+.f64 a b))))))
	36.8%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (fma.f64 (-.f64 (.f64 (-.f64 (/.f64 (neg.f64 a) (.f64 b b)) (pow.f64 b #s(literal -1 binary64))) a) #s(literal 1 binary64)) a (neg.f64 b))))))
	14.5%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (/.f64 (*.f64 b b) a)))))
	46.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (*.f64 #s(literal -1 binary64) (+.f64 a b))))))
	45.9%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) #s(approx (/ (* b b) (- a b)) (neg.f64 b)))))
	57.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (.f64 b (/.f64 b (/.f64 (-.f64 (.f64 a a) (*.f64 b b)) (+.f64 a b)))))))
	45.6%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (*.f64 b (/.f64 b #s(approx (- a b) a))))))
	42.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (.f64 b #s(approx (/ b (- a b)) (/.f64 (+.f64 (/.f64 (.f64 b b) a) b) a))))))
	38.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (.f64 b #s(approx (/ b (- a b)) (.f64 (+.f64 (/.f64 b (*.f64 a a)) (pow.f64 a #s(literal -1 binary64))) b))))))
	29.6%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a (/.f64 a #s(approx (- a b) (neg.f64 b)))) (/.f64 (*.f64 b b) (-.f64 a b)))))
	42.8%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 (.f64 a #s(approx (/ a (- a b)) (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 a a) b) a) b)))) (.f64 b (/.f64 b (-.f64 a b))))))
	45.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 #s(approx (/ ( a a) (- a b)) (fma.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b a)) (/.f64 (*.f64 b b) (-.f64 a b)))))
	52.9%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 #s(approx ( a (/ a (- a b))) (+.f64 a b)) (*.f64 b (/.f64 b (-.f64 a b))))))
✓	76.8%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	60.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	54.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) a)))
✓	57.9%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	51.0%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	50.1%	(/.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))))
	30.9%	(/.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 #s(approx (cos a) #s(literal 1 binary64)))))
	18.7%	(/.f64 (.f64 r #s(approx (sin b) b)) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) (/.f64 (*.f64 b b) (-.f64 a b)))))
	49.3%	(/.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)))
	48.6%	(/.f64 #s(approx (* r (sin b)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) r) r) 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))))
	52.1%	(/.f64 #s(approx (* r (sin b)) (.f64 b r)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
	49.3%	(/.f64 #s(approx (* r (sin b)) (.f64 b r)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (*.f64 b (/.f64 b (-.f64 a b))))))
	49.5%	(/.f64 #s(approx (* r (sin b)) (.f64 b r)) #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))))
	59.0%	(.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	46.0%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 (-.f64 (/.f64 (.f64 a a) #s(approx (- a b) (neg.f64 b))) (*.f64 b (/.f64 b (-.f64 a b)))))))
	57.9%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (- (/ ( a a) (- a b)) (/ (* b b) (- a b))) b))))
	54.0%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
	53.9%	(.f64 r (/.f64 (sin.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)))))
	49.3%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	49.3%	(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
	49.2%	#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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))
	49.3%	#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 b (/.f64 r (cos.f64 a))))
	54.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))))
	31.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)))))))
	32.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
	32.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓	58.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
✓	30.5%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
✓	30.1%	#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)))
	21.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64))) (.f64 r r)) (-.f64 (.f64 (.f64 (.f64 b b) r) #s(literal 1/3 binary64)) r)) b)))
	10.6%	#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)))
	13.8%	#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)))

Compiler

Compiled 4 264 to 1 641 computations (61.5% saved)

regimes114.0ms (2.1%)

Memory

3.5MiB live, 190.1MiB allocated; 21ms collecting garbage

Counts

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

Outputs
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes133.0ms (2.4%)

Memory

22.7MiB live, 166.6MiB allocated; 12ms collecting garbage

Counts

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

Calls

4 calls:

60.0ms	b
25.0ms	a
23.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
21.0ms	r

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)

regimes100.0ms (1.8%)

Memory

1.9MiB live, 195.4MiB allocated; 19ms collecting garbage

Counts

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes56.0ms (1%)

Memory

-5.4MiB live, 132.7MiB allocated; 9ms collecting garbage

Counts

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes33.0ms (0.6%)

Memory

-25.2MiB live, 75.6MiB allocated; 3ms collecting garbage

Counts

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

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes30.0ms (0.5%)

Memory

12.5MiB live, 59.4MiB allocated; 2ms collecting garbage

Counts

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
64.4%	4	`r`
63.2%	3	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
76.9%	3	`a`
76.9%	3	`b`

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes7.0ms (0.1%)

Memory

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

Counts

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

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

Calls

1 calls:

6.0ms

Results

Accuracy	Segments	Branch
76.9%	3	`a`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes13.0ms (0.2%)

Memory

-18.9MiB live, 28.0MiB allocated; 2ms collecting garbage

Counts

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

Outputs

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

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

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

Calls

2 calls:

7.0ms	a
6.0ms	b

Results

Accuracy	Segments	Branch
76.9%	3	`b`
74.9%	3	`a`

Compiler

Compiled 2 to 6 computations (-200% saved)

regimes5.0ms (0.1%)

Memory

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

Counts

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

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
76.9%	3	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes5.0ms (0.1%)

Memory

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

Counts

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

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
76.9%	3	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

Memory

-41.1MiB live, 9.2MiB allocated; 3ms collecting garbage

Counts

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

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

1 calls:

5.0ms

Results

Accuracy	Segments	Branch
76.9%	3	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes11.0ms (0.2%)

Memory

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

Counts

8 → 1

Calls

Call 1

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes12.0ms (0.2%)

Memory

-32.2MiB live, 14.0MiB allocated; 2ms collecting garbage

Accuracy

Total -17.7b remaining (-39.8%)

Threshold costs -17.7b (-39.8%)

Counts

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

bsearch32.0ms (0.6%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
24.0ms	8.146370919223013e-10	1722.0703738300508
5.0ms	-12.902940811771584	-11.867991766097811

Samples

15.0ms	94×	1	valid
6.0ms	98×	0	valid

Compiler

Compiled 312 to 278 computations (10.9% saved)

Precisions

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

ival-cos: 5.0ms (31.7% of total)

ival-sin: 4.0ms (25.4% of total)

adjust: 2.0ms (12.7% of total)

ival-add: 1.0ms (6.3% of total)

ival-div: 1.0ms (6.3% of total)

ival-mult: 1.0ms (6.3% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	8.146370919223013e-10	1722.0703738300508
0.0ms	-12.902940811771584	-11.867991766097811

Compiler

Compiled 312 to 278 computations (10.9% saved)

bsearch44.0ms (0.8%)

Memory

-7.9MiB live, 38.7MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
16.0ms	6.318882978799885e-8	6.484772195003111e-6
25.0ms	-8156399.919096215	-5.838339707848583e-10

Samples

18.0ms	134×	1	valid
8.0ms	138×	0	valid

Compiler

Compiled 777 to 609 computations (21.6% saved)

Precisions

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

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

adjust: 3.0ms (16.2% of total)

ival-sin: 3.0ms (16.2% of total)

ival-add: 2.0ms (10.8% of total)

ival-div: 2.0ms (10.8% of total)

ival-mult: 2.0ms (10.8% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

6.3MiB live, 6.4MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.318882978799885e-8	6.484772195003111e-6
1.0ms	-8156399.919096215	-5.838339707848583e-10

Compiler

Compiled 437 to 388 computations (11.2% saved)

bsearch20.0ms (0.4%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.318882978799885e-8	6.484772195003111e-6
17.0ms	-8156399.919096215	-5.838339707848583e-10

Samples

8.0ms	63×	1	valid
4.0ms	65×	0	valid

Compiler

Compiled 488 to 422 computations (13.5% saved)

Precisions

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

ival-cos: 3.0ms (34.5% of total)

adjust: 2.0ms (23% of total)

ival-add: 1.0ms (11.5% of total)

ival-div: 1.0ms (11.5% of total)

ival-mult: 1.0ms (11.5% of total)

ival-sin: 1.0ms (11.5% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch15.0ms (0.3%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.318882978799885e-8	6.484772195003111e-6
1.0ms	-8156399.919096215	-5.838339707848583e-10

Compiler

Compiled 522 to 439 computations (15.9% saved)

simplify53.0ms (1%)

Memory

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	91	343
1	135	343
2	179	343
3	223	343
4	255	343
5	341	343
6	873	343
7	5278	343

Stop Event

1×	node limit

Calls

Call 1

Inputs
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (.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)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (*.f64 b (/.f64 b (-.f64 a b))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 a #s(literal -12 binary64)) (.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))) (if (<=.f64 a #s(literal 5534023222112865/4611686018427387904 binary64)) #s(approx (/ ( r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))))
(if (<=.f64 a #s(literal -12 binary64)) (.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))) (if (<=.f64 a #s(literal 5534023222112865/4611686018427387904 binary64)) #s(approx (/ ( r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))))
(if (<=.f64 b #s(literal -7378697629483821/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)) (/.f64 #s(approx ( r (sin b)) (.f64 b r)) #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)))) #s(approx (/ ( r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (<=.f64 b #s(literal -7378697629483821/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)) (/.f64 (.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (<=.f64 b #s(literal -5902958103587057/1180591620717411303424 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)) (.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (<=.f64 b #s(literal -5902958103587057/1180591620717411303424 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 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 r (tan.f64 b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))

Outputs
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.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)) (cos.f64 (-.f64 (.f64 a (/.f64 a (-.f64 a b))) (*.f64 b (/.f64 b (-.f64 a b))))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 a #s(literal -12 binary64)) (.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))) (if (<=.f64 a #s(literal 5534023222112865/4611686018427387904 binary64)) #s(approx (/ ( r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))))
(if (<=.f64 a #s(literal -12 binary64)) (.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))) (if (<=.f64 a #s(literal 5534023222112865/4611686018427387904 binary64)) #s(approx (/ ( r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))))
(if (or (<=.f64 a #s(literal -12 binary64)) (not (<=.f64 a #s(literal 5534023222112865/4611686018427387904 binary64)))) (.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))) #s(approx (/ ( r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))))
(if (<=.f64 b #s(literal -7378697629483821/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)) (/.f64 #s(approx ( r (sin b)) (.f64 b r)) #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)))) #s(approx (/ ( r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -7378697629483821/147573952589676412928 binary64)) (not (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (/.f64 #s(approx ( r (sin b)) (.f64 b r)) #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)))))
(if (<=.f64 b #s(literal -7378697629483821/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)) (/.f64 (.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -7378697629483821/147573952589676412928 binary64)) (not (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (/.f64 (.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -5902958103587057/1180591620717411303424 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)) (.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -5902958103587057/1180591620717411303424 binary64)) (not (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))))
(if (<=.f64 b #s(literal -5902958103587057/1180591620717411303424 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 3246626956972881/590295810358705651712 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 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -5902958103587057/1180591620717411303424 binary64)) (not (<=.f64 b #s(literal 3246626956972881/590295810358705651712 binary64)))) #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)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))

derivations352.0ms (6.5%)

Memory

-34.7MiB live, 257.6MiB allocated; 66ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 343 to 92 computations (73.2% saved)

preprocess68.0ms (1.2%)

Memory: 1.9MiB live, 143.2MiB allocated; 17ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 768 to 248 computations (67.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze401.0ms (7.4%)

sample1.5s (28.4%)

explain210.0ms (3.9%)

preprocess268.0ms (4.9%)

eval0.0ms (0%)

prune0.0ms (0%)

series71.0ms (1.3%)

rewrite216.0ms (4%)

eval10.0ms (0.2%)

prune26.0ms (0.5%)

series79.0ms (1.5%)

rewrite286.0ms (5.2%)

eval87.0ms (1.6%)

prune48.0ms (0.9%)

series101.0ms (1.9%)

rewrite266.0ms (4.9%)

eval107.0ms (2%)

prune129.0ms (2.4%)

series83.0ms (1.5%)

rewrite225.0ms (4.1%)

eval100.0ms (1.8%)

prune78.0ms (1.4%)

regimes114.0ms (2.1%)

regimes133.0ms (2.4%)

regimes100.0ms (1.8%)

regimes56.0ms (1%)

regimes33.0ms (0.6%)

regimes30.0ms (0.5%)

regimes7.0ms (0.1%)

regimes13.0ms (0.2%)

regimes5.0ms (0.1%)

regimes5.0ms (0.1%)

regimes6.0ms (0.1%)

regimes11.0ms (0.2%)

regimes12.0ms (0.2%)

bsearch32.0ms (0.6%)

bsearch1.0ms (0%)

bsearch44.0ms (0.8%)

bsearch2.0ms (0%)

bsearch20.0ms (0.4%)

bsearch15.0ms (0.3%)

simplify53.0ms (1%)

derivations352.0ms (6.5%)

preprocess68.0ms (1.2%)

end0.0ms (0%)

Profiling