Metrics for rsin A (should all be same)

start0.0ms (0%)

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

analyze349.0ms (6.6%)

Memory

19.9MiB live, 428.6MiB allocated; 81ms 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)

sample2.2s (42.4%)

Memory

-76.9MiB live, 1 870.9MiB allocated; 1.4s collecting garbage

Samples

1.3s	6 060×	1	valid
660.0ms	2 196×	0	valid

Precisions

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

ival-cos: 345.0ms (33.1% of total)

ival-sin: 306.0ms (29.4% of total)

adjust: 164.0ms (15.8% of total)

ival-div!: 118.0ms (11.3% of total)

ival-mult!: 60.0ms (5.8% of total)

ival-add!: 48.0ms (4.6% of total)

Bogosity

explain133.0ms (2.5%)

Memory

1.8MiB live, 196.2MiB allocated; 18ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
61	137	(-1807.2064037358189 -3.1000009010999432e-204 -2.6536224037477517e+21)	-	`(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	198	1

Confusion

	Predicted +	Predicted -
+	61	0
-	137	58

Precision

0.30808080808080807

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	61	0	0
-	137	1	57

Precision?

0.3065326633165829

Recall?

1.0

Freqs

test

number	freq
0	58
1	198

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

59.0ms	384×	1	valid
17.0ms	128×	0	valid

Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions

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

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

ival-sin: 12.0ms (24.1% of total)

adjust: 8.0ms (16% of total)

ival-mult!: 6.0ms (12% of total)

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

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

preprocess45.0ms (0.9%)

Memory

-34.0MiB live, 11.8MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(negabs r)

Compiler

Compiled 18 to 16 computations (11.1% saved)

series16.0ms (0.3%)

Memory

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

Counts

8 → 42

Calls

Call 1

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

Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))

Calls

9 calls:

Time	Variable		Point	Expression
3.0ms	b	@	-inf	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms	r	@	inf	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms	r	@	0	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms	a	@	0	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms	r	@	-inf	((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)

rewrite202.0ms (3.8%)

Memory

7.2MiB live, 185.8MiB allocated; 26ms 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))))

eval9.0ms (0.2%)

Memory: 9.1MiB live, 9.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 1 485 to 356 computations (76% saved)

prune13.0ms (0.2%)

Memory

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

Pruning

20 alts after pruning (19 fresh and 1 done)

	Pruned	Kept	Total
New	51	19	70
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	51	20	71

Accuracy

99.8%

Counts

71 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	78.9%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	40.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	40.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	79.1%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
▶	64.1%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
	61.7%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
	56.7%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
	60.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
	54.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	60.2%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
▶	53.1%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
	79.0%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
	58.7%	#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))))
▶	52.9%	#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))
▶	61.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	53.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))

Compiler

Compiled 781 to 514 computations (34.2% saved)

series100.0ms (1.9%)

Memory

-28.7MiB live, 79.7MiB allocated; 27ms collecting garbage

Counts

35 → 157

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

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

Calls

9 calls:

Time	Variable		Point	Expression
37.0ms	r	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ a b) 1) b) (+ (/ a b) 1) (/ a b) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 (/ r (cos a)))
21.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))) (* r (sin b)) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ a b) 1) b) (+ (/ a b) 1) (/ a b) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 (/ r (cos a)))
7.0ms	r	@	0	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ a b) 1) b) (+ (/ a b) 1) (/ a b) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 (/ r (cos a)))
6.0ms	r	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ a b) 1) b) (+ (/ a b) 1) (/ a b) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 (/ r (cos a)))
6.0ms	a	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ a b) 1) b) (+ (/ a b) 1) (/ a b) 1 (/ (* r (sin b)) (cos (+ a b))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 (/ r (cos a)))

rewrite200.0ms (3.8%)

Memory

36.0MiB live, 217.5MiB allocated; 26ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	667	3917
0	715	3583
1	3931	3551
0	8301	3404

Stop Event

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

Counts

192 → 350

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

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

eval49.0ms (0.9%)

Memory: 8.5MiB live, 95.9MiB allocated; 13ms collecting garbage
Compiler: Compiled 9 858 to 1 771 computations (82% saved)

prune41.0ms (0.8%)

Memory

-23.2MiB live, 78.2MiB allocated; 18ms collecting garbage

Pruning

39 alts after pruning (36 fresh and 3 done)

	Pruned	Kept	Total
New	318	28	346
Fresh	6	8	14
Picked	3	2	5
Done	0	1	1
Total	327	39	366

Accuracy

99.8%

Counts

366 → 39

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
	39.3%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (/.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 (sin.f64 b) (sin.f64 a))))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (sin.f64 b) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a))))
▶	99.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	66.2%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
	63.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
▶	58.2%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	40.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	40.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	79.1%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	41.6%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 #s(approx (+ (/ a b) 1) (/.f64 a b)) b))))
	61.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx ( (+ (/ a b) 1) b) b))))
	56.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx ( (+ (/ a b) 1) b) a))))
	54.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	60.2%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	35.6%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
	53.0%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
	64.1%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b)))))
	53.1%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	58.7%	#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))))
	52.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 (fma.f64 (.f64 (.f64 (sin.f64 a) r) b) (cos.f64 a) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) b))
	33.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 #s(approx (+ ( b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
	53.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 #s(approx (+ ( b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
▶	35.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 #s(approx (+ ( b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r) b))
	31.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
	61.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
▶	31.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
	31.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓	61.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
	36.9%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (.f64 (fma.f64 (sin.f64 a) (/.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (.f64 (cos.f64 a) b))) (*.f64 b b))))
	52.9%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (.f64 (.f64 b r) (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))))))

Compiler

Compiled 1 813 to 1 209 computations (33.3% saved)

series103.0ms (2%)

Memory

6.7MiB live, 99.3MiB allocated; 7ms collecting garbage

Counts

33 → 187

Calls

Call 1

Inputs
(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 #s(approx (+ ( b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r) b))
(.f64 #s(approx (+ ( b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
(*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(+.f64 (+.f64 b (PI.f64)) (PI.f64))
(+.f64 b (PI.f64))
(PI.f64)
(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 a) #s(literal -1 binary64))
#s(literal -1 binary64)

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

Calls

9 calls:

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

rewrite206.0ms (3.9%)

Memory

-28.3MiB live, 225.2MiB allocated; 81ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	737	6004
0	786	5127
1	4234	4608
0	8637	4371

Stop Event

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

Counts

220 → 422

Calls

Call 1

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

eval55.0ms (1%)

Memory: 10.3MiB live, 101.4MiB allocated; 15ms collecting garbage
Compiler: Compiled 11 183 to 1 811 computations (83.8% saved)

prune45.0ms (0.8%)

Memory

19.8MiB live, 65.5MiB allocated; 6ms collecting garbage

Pruning

45 alts after pruning (40 fresh and 5 done)

	Pruned	Kept	Total
New	394	23	417
Fresh	14	17	31
Picked	2	3	5
Done	1	2	3
Total	411	45	456

Accuracy

99.9%

Counts

456 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a))))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	66.2%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) #s(approx (/ 1 (pow (sin a) -1)) a))))
	80.6%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	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)))))
	39.3%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (/.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 (sin.f64 b) (sin.f64 a))))
	48.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) #s(literal 2 binary64))))))
	48.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (.f64 (pow.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))))))
▶	63.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
✓	58.2%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	38.9%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
	40.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
	40.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	79.1%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	41.6%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 #s(approx (+ (/ a b) 1) (/.f64 a b)) b))))
	61.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx ( (+ (/ a b) 1) b) b))))
	56.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx ( (+ (/ a b) 1) b) a))))
	54.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	60.2%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
	35.6%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
	53.0%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
	58.2%	(.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	64.1%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b)))))
▶	53.1%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	53.0%	#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 b (/.f64 r (cos.f64 a))))
	58.7%	#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))))
▶	52.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 (fma.f64 (.f64 (.f64 (sin.f64 a) r) b) (cos.f64 a) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) b))
✓	35.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 #s(approx (+ ( b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r) b))
	31.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
	61.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
	31.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b))))
	31.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)))))
	31.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)) (PI.f64)))))
	31.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
	6.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 #s(approx (+ b (PI)) (PI.f64)) (PI.f64)))))
✓	61.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
▶	17.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))
	52.9%	#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (.f64 (.f64 b r) (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))))))

Compiler

Compiled 1 912 to 1 365 computations (28.6% saved)

series118.0ms (2.2%)

Memory

-25.1MiB live, 125.9MiB allocated; 9ms collecting garbage

Counts

36 → 209

Calls

Call 1

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

Outputs
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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 (PI)) (PI)))) #s(hole binary64 (/ (* r (sin (+ b (* 2 (PI))))) (cos (+ b (* 2 (PI)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (/ (* b (* r (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))) (pow (cos a) 3))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (/ (* r (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))) (pow (cos a) 3))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (* r (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (* (sin a) r) b) #s(hole binary64 (* b (* r (sin a)))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (* (pow (cos a) 2) r) #s(hole binary64 (* r (pow (cos a) 2))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (* -1 (/ (* b (* r (+ (* -1 (* b (* (cos a) (sin a)))) (* -1 (pow (cos a) 2))))) (pow (cos a) 3)))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (* -1 (/ (* r (+ (* -1 (* b (* (cos a) (sin a)))) (* -1 (pow (cos a) 2)))) (pow (cos a) 3)))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (* -1 (* r (+ (* -1 (* b (* (cos a) (sin a)))) (* -1 (pow (cos a) 2)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #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 b) (cos 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)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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 (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #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 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 (/ (* 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 b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (* b r)))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (+ (* a (+ (* a (- (* -1 (* b r)) (* -3/2 (* b r)))) (* (pow b 2) r))) (* b r))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (+ (* a (+ (* a (- (+ (* -1 (* b r)) (* a (- (* -2/3 (* (pow b 2) r)) (* -3/2 (* (pow b 2) r))))) (* -3/2 (* b r)))) (* (pow b 2) r))) (* b r))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 r))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (+ r (* a (+ (* a (- (* -1 r) (* -3/2 r))) (* b r))))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (+ r (* a (+ (* a (- (+ (* -1 r) (* a (- (* -2/3 (* b r)) (* -3/2 (* b r))))) (* -3/2 r))) (* b r))))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 r))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (+ r (* a (+ (* -1 (* a r)) (* b r))))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (+ r (* a (+ (* a (+ (* -1 r) (* -2/3 (* a (* b r))))) (* b r))))))
#s(approx (* (* (sin a) r) b) #s(hole binary64 (* a (* b r))))
#s(approx (* (* (sin a) r) b) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* b r))) (* b r)))))
#s(approx (* (* (sin a) r) b) #s(hole binary64 (* a (+ (* b r) (* (pow a 2) (+ (* -1/6 (* b r)) (* 1/120 (* (pow a 2) (* b r)))))))))
#s(approx (* (* (sin a) r) b) #s(hole binary64 (* a (+ (* b r) (* (pow a 2) (+ (* -1/6 (* b r)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* b r))) (* 1/120 (* b r))))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a r)))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (* (pow (cos a) 2) r) #s(hole binary64 r))
#s(approx (* (pow (cos a) 2) r) #s(hole binary64 (+ r (* -1 (* (pow a 2) r)))))
#s(approx (* (pow (cos a) 2) r) #s(hole binary64 (+ r (* (pow a 2) (+ (* -1 r) (* 1/3 (* (pow a 2) r)))))))
#s(approx (* (pow (cos a) 2) r) #s(hole binary64 (+ r (* (pow a 2) (+ (* -1 r) (* (pow a 2) (+ (* -2/45 (* (pow a 2) r)) (* 1/3 r))))))))
#s(approx (pow (cos a) 2) #s(hole binary64 1))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (pow (cos a) 3) #s(hole binary64 1))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#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) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (/ (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2)))) (pow (cos a) 3))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (/ (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))) (pow (cos a) 3))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (cos a) 3) #s(hole binary64 (pow (cos a) 3)))
#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)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #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 b) (cos 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)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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 (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (neg (sin b)) #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 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 (/ (* 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 (PI)) (PI)))) #s(hole binary64 (/ (* r (sin (* 2 (PI)))) (cos (* 2 (PI))))))
#s(approx (* r (tan (+ (+ b (PI)) (PI)))) #s(hole binary64 (+ (* b (* r (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))) (/ (* r (sin (* 2 (PI)))) (cos (* 2 (PI)))))))
#s(approx (* r (tan (+ (+ b (PI)) (PI)))) #s(hole binary64 (+ (* b (+ (* r (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (* b (* r (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))))) (cos (* 2 (PI)))))) (/ (* r (sin (* 2 (PI)))) (cos (* 2 (PI)))))))
#s(approx (* r (tan (+ (+ b (PI)) (PI)))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (* b (* r (+ 1/6 (+ (* -1 (/ (* (pow (sin (* 2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (pow (cos (* 2 (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (* 1/6 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))))))) (/ (* r (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))) (cos (* 2 (PI)))))) (* r (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))))) (/ (* r (sin (* 2 (PI)))) (cos (* 2 (PI)))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (* 2 (PI))) (cos (* 2 (PI))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))) (cos (* 2 (PI))))) (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (* 2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (pow (cos (* 2 (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (* 1/6 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))))) (* -1 (/ (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (cos (* 2 (PI)))))))) (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (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 (* (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 a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (/ r (cos a))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (* r (pow (cos a) 2))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (+ b (* 2 (PI)))) (cos (+ b (* 2 (PI)))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (pow (cos a) 2))))
#s(approx (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (* b (* r (* (cos a) (sin a))))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (* b (+ (* r (* (cos a) (sin a))) (/ (* r (pow (cos a) 2)) b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* r (tan (+ (+ b (PI)) (PI)))) #s(hole binary64 (/ (* r (sin (- (* 2 (PI)) (* -1 b)))) (cos (- (* 2 (PI)) (* -1 b))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (- (* 2 (PI)) (* -1 b))) (cos (- (* 2 (PI)) (* -1 b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) #s(hole binary64 (* -1 (* b (+ (* -1 (* r (* (cos a) (sin a)))) (* -1 (/ (* r (pow (cos a) 2)) b)))))))

Calls

9 calls:

Time	Variable		Point	Expression
37.0ms	b	@	-inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan (+ (+ b (PI)) (PI)))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (/ (* r (sin b)) (cos (+ a b))) (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (* (* (sin a) r) b) (* (sin a) r) (* (pow (cos a) 2) r) (pow (cos a) 2) 2 (pow (cos a) 3) 3)
29.0ms	r	@	0	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan (+ (+ b (PI)) (PI)))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (/ (* r (sin b)) (cos (+ a b))) (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (* (* (sin a) r) b) (* (sin a) r) (* (pow (cos a) 2) r) (pow (cos a) 2) 2 (pow (cos a) 3) 3)
11.0ms	a	@	inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan (+ (+ b (PI)) (PI)))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (/ (* r (sin b)) (cos (+ a b))) (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (* (* (sin a) r) b) (* (sin a) r) (* (pow (cos a) 2) r) (pow (cos a) 2) 2 (pow (cos a) 3) 3)
9.0ms	r	@	-inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan (+ (+ b (PI)) (PI)))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (/ (* r (sin b)) (cos (+ a b))) (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (* (* (sin a) r) b) (* (sin a) r) (* (pow (cos a) 2) r) (pow (cos a) 2) 2 (pow (cos a) 3) 3)
8.0ms	r	@	inf	((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan (+ (+ b (PI)) (PI)))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (/ (* r (sin b)) (cos (+ a b))) (* (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) b) (/ (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (pow (cos a) 3)) (+ (* (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (* (* (sin a) r) b) (* (sin a) r) (* (pow (cos a) 2) r) (pow (cos a) 2) 2 (pow (cos a) 3) 3)

rewrite210.0ms (4%)

Memory

22.8MiB live, 159.0MiB allocated; 19ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	887	6635
0	938	5708
1	5243	5332
0	8338	5082

Stop Event

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

Counts

245 → 418

Calls

Call 1

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

eval67.0ms (1.3%)

Memory: -32.9MiB live, 160.6MiB allocated; 19ms collecting garbage
Compiler: Compiled 12 535 to 1 987 computations (84.1% saved)

prune42.0ms (0.8%)

Memory

14.5MiB live, 108.8MiB allocated; 4ms collecting garbage

Pruning

46 alts after pruning (39 fresh and 7 done)

	Pruned	Kept	Total
New	382	11	393
Fresh	7	28	35
Picked	2	3	5
Done	1	4	5
Total	392	46	438

Accuracy

99.9%

Counts

438 → 46

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.0%	(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	39.3%	(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (/.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))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a))))
	58.2%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx ( (cos b) (cos a)) (cos.f64 a))))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
	66.2%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 b)) #s(approx (/ 1 (pow (sin a) -1)) a))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	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)))))
	48.6%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) #s(literal 2 binary64))))))
	48.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (.f64 (pow.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))))))
✓	63.4%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	60.2%	(/.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))))
	38.9%	(/.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))))
	40.0%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
	40.3%	(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	79.1%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
	41.6%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (.f64 #s(approx (+ (/ a b) 1) (/.f64 a b)) b))))
	61.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx ( (+ (/ a b) 1) b) b))))
	56.7%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx ( (+ (/ a b) 1) b) a))))
	54.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
	53.0%	(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) a)))
	35.5%	(/.f64 #s(approx (* r (sin b)) (.f64 b r)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
	63.4%	(.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	58.2%	(.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	64.1%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b)))))
	35.6%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) b))))
	52.9%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) a))))
	52.0%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (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))))
	52.8%	(.f64 r #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)))
	53.0%	#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 b (/.f64 r (cos.f64 a))))
	52.9%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(approx (+ ( (* (* (sin a) r) b) (cos a)) (* (pow (cos a) 2) r)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) b))
✓	35.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 #s(approx (+ ( b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r) b))
	31.3%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
	61.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
	31.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b))))
	31.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)))))
	31.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)) (PI.f64)))))
	31.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
	6.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 #s(approx (+ b (PI)) (PI.f64)) (PI.f64)))))
✓	61.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
✓	17.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))

Compiler

Compiled 2 859 to 1 108 computations (61.2% saved)

regimes118.0ms (2.2%)

Memory

20.5MiB live, 166.7MiB allocated; 19ms collecting garbage

Counts

82 → 1

Calls

Call 1

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

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

Calls

4 calls:

39.0ms	a
28.0ms	b
27.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
20.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)

regimes61.0ms (1.2%)

Memory

5.2MiB live, 149.5MiB allocated; 9ms collecting garbage

Counts

53 → 1

Calls

Call 1

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

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:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes60.0ms (1.1%)

Memory

-4.3MiB live, 140.7MiB allocated; 9ms collecting garbage

Counts

52 → 1

Calls

Call 1

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

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

Calls

4 calls:

16.0ms	b
15.0ms	a
14.0ms	r
13.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes59.0ms (1.1%)

Memory

-19.0MiB live, 119.8MiB allocated; 8ms collecting garbage

Counts

51 → 1

Calls

Call 1

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes77.0ms (1.5%)

Memory

9.5MiB live, 60.0MiB allocated; 4ms collecting garbage

Counts

25 → 1

Calls

Call 1

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

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes37.0ms (0.7%)

Memory

15.7MiB live, 63.2MiB allocated; 1ms collecting garbage

Counts

24 → 3

Calls

Call 1

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

Outputs
(/.f64 (*.f64 r (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:

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

Results

Accuracy	Segments	Branch
66.0%	3	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
61.8%	1	`r`
79.5%	3	`b`
79.6%	3	`a`

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes12.0ms (0.2%)

Memory

-22.2MiB live, 24.0MiB allocated; 2ms collecting garbage

Counts

15 → 3

Calls

Call 1

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

Calls

2 calls:

6.0ms	a
5.0ms	b

Results

Accuracy	Segments	Branch
79.5%	3	`b`
78.1%	3	`a`

Compiler

Compiled 2 to 6 computations (-200% saved)

regimes4.0ms (0.1%)

Memory

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

Counts

11 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
79.5%	3	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

Memory

-30.4MiB live, 16.9MiB allocated; 1ms collecting garbage

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 11 to 14 computations (-27.3% saved)

regimes6.0ms (0.1%)

Memory

19.1MiB live, 19.0MiB allocated; 0ms collecting garbage

Counts

2 → 1

Calls

Call 1

Inputs

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

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes4.0ms (0.1%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

bsearch31.0ms (0.6%)

Memory

6.8MiB live, 58.3MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
9.0ms	1.272296071751838e-7	1.8878621473036164e-7
20.0ms	-3.7245446186081497e-6	-8.739062965979763e-7

Samples

12.0ms	75×	1	valid
11.0ms	85×	0	valid

Compiler

Compiled 262 to 234 computations (10.7% saved)

Precisions

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

ival-add!: 7.0ms (38.3% of total)

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

ival-cos: 4.0ms (21.9% of total)

adjust: 2.0ms (10.9% of total)

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

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

bsearch50.0ms (1%)

Memory

-18.4MiB live, 117.8MiB allocated; 12ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
22.0ms	5.0398986604236593e-26	1.413055318565401e-21
25.0ms	-95.06940158066779	-1.4800709175348092e-9

Samples

29.0ms	155×	1	valid
7.0ms	133×	0	valid

Compiler

Compiled 498 to 428 computations (14.1% saved)

Precisions

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

ival-sin: 10.0ms (35.7% of total)

ival-cos: 10.0ms (35.7% of total)

adjust: 3.0ms (10.7% of total)

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

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

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

bsearch2.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.0398986604236593e-26	1.413055318565401e-21
1.0ms	-95.06940158066779	-1.4800709175348092e-9

Compiler

Compiled 552 to 464 computations (15.9% saved)

derivations355.0ms (6.7%)

Memory

14.0MiB live, 563.8MiB allocated; 111ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 275 to 74 computations (73.1% saved)

preprocess149.0ms (2.8%)

Memory: 37.9MiB live, 325.2MiB allocated; 86ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 1 118 to 492 computations (56% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze349.0ms (6.6%)

sample2.2s (42.4%)

explain133.0ms (2.5%)

preprocess45.0ms (0.9%)

series16.0ms (0.3%)

rewrite202.0ms (3.8%)

eval9.0ms (0.2%)

prune13.0ms (0.2%)

series100.0ms (1.9%)

rewrite200.0ms (3.8%)

eval49.0ms (0.9%)

prune41.0ms (0.8%)

series103.0ms (2%)

rewrite206.0ms (3.9%)

eval55.0ms (1%)

prune45.0ms (0.8%)

series118.0ms (2.2%)

rewrite210.0ms (4%)

eval67.0ms (1.3%)

prune42.0ms (0.8%)

regimes118.0ms (2.2%)

regimes61.0ms (1.2%)

regimes60.0ms (1.1%)

regimes59.0ms (1.1%)

regimes77.0ms (1.5%)

regimes37.0ms (0.7%)

regimes12.0ms (0.2%)

regimes4.0ms (0.1%)

regimes6.0ms (0.1%)

regimes6.0ms (0.1%)

regimes4.0ms (0.1%)

bsearch31.0ms (0.6%)

bsearch50.0ms (1%)

bsearch2.0ms (0%)

derivations355.0ms (6.7%)

preprocess149.0ms (2.8%)

end0.0ms (0%)

Profiling