Metrics for rsin B (should all be same)

start0.0ms (0%)

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

analyze314.0ms (3.5%)

Memory

-3.4MiB live, 358.5MiB allocated; 105ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.9%	0.1%	0%	0%	0%	0
0%	0%	99.9%	0.1%	0%	0%	0%	1
0%	0%	99.9%	0.1%	0%	0%	0%	2
0%	0%	99.9%	0.1%	0%	0%	0%	3
0%	0%	99.9%	0.1%	0%	0%	0%	4
0%	0%	99.9%	0.1%	0%	0%	0%	5
0%	0%	99.9%	0.1%	0%	0%	0%	6
12.5%	12.5%	87.4%	0.1%	0%	0%	0%	7
12.5%	12.5%	87.4%	0.1%	0%	0%	0%	8
18.8%	18.7%	81.1%	0.1%	0%	0%	0%	9
21.9%	21.8%	78%	0.1%	0%	0%	0%	10
21.9%	21.8%	78%	0.1%	0%	0%	0%	11
23.4%	23.4%	76.5%	0.1%	0%	0%	0%	12

Compiler

Compiled 11 to 10 computations (9.1% saved)

sample1.9s (21.6%)

Memory

71.5MiB live, 1 937.0MiB allocated; 458ms collecting garbage

Samples

1.3s	6 004×	1	valid
301.0ms	2 252×	0	valid

Precisions

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

ival-cos: 329.0ms (28.1% of total)

ival-sin: 272.0ms (23.2% of total)

adjust: 197.0ms (16.8% of total)

ival-add: 189.0ms (16.2% of total)

ival-mult: 106.0ms (9.1% of total)

ival-div: 67.0ms (5.7% of total)

ival-true: 6.0ms (0.5% of total)

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

Bogosity

explain139.0ms (1.6%)

Memory

6.7MiB live, 154.9MiB allocated; 18ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
81	120	(-6.463666032349542e-136 -2.1759009698527846e+234 -1.0509411374062832e-271)	-	`(cos.f64 (+.f64 a b))`
0	0	-	-	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
0	0	-	-	`(+.f64 a b)`
0	0	-	-	`(sin.f64 b)`
0	0	-	-	`a`
0	0	-	-	`r`
0	0	-	-	`b`
0	0	-	-	`(*.f64 r (/.f64 (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	201	1

Confusion

	Predicted +	Predicted -
+	81	0
-	120	55

Precision

0.40298507462686567

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	81	0	0
-	120	1	54

Precision?

0.400990099009901

Recall?

1.0

Freqs

test

number	freq
0	55
1	201

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

72.0ms	390×	1	valid
9.0ms	122×	0	valid

Compiler

Compiled 69 to 28 computations (59.4% saved)

Precisions

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

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

ival-sin: 13.0ms (22.6% of total)

adjust: 10.0ms (17.4% of total)

ival-mult: 7.0ms (12.2% of total)

ival-add: 5.0ms (8.7% of total)

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

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

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

preprocess224.0ms (2.5%)

Memory

-7.7MiB live, 179.0MiB allocated; 78ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	37	90
1	101	88
2	204	88
3	426	88
4	768	88
5	1630	88
6	3489	88
7	6523	88
0	8	9
0	13	9
1	24	9
2	41	9
3	65	9
4	84	9
5	108	9
6	206	9
7	801	9
8	5283	9
0	8268	9

Stop Event

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

Calls

Call 1

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

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

Symmetry

(negabs r)

Compiler

Compiled 9 to 8 computations (11.1% saved)

eval0.0ms (0%)

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

prune0.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Compiler

Compiled 9 to 8 computations (11.1% saved)

simplify164.0ms (1.8%)

Memory

-12.4MiB live, 126.8MiB allocated; 20ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(cos.f64 (+.f64 a b))
cost-diff	0	(sin.f64 b)
cost-diff	0	(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
cost-diff	0	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	8	28
0	13	28
1	24	28
2	41	28
3	65	28
4	84	28
5	108	28
6	206	28
7	801	28
8	5283	28
0	8268	28

Stop Event

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

Calls

Call 1

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

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

localize391.0ms (4.4%)

Memory

-27.6MiB live, 57.7MiB allocated; 751ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.0	(sin.f64 b)
accuracy	0.203125	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
accuracy	17.44189337164995	(cos.f64 (+.f64 a b))

Samples

379.0ms	195×	1	valid
4.0ms	61×	0	valid

Compiler

Compiled 30 to 10 computations (66.7% saved)

Precisions

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

ival-mult: 339.0ms (93.4% of total)

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

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

adjust: 5.0ms (1.4% of total)

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

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

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

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

series18.0ms (0.2%)

Memory

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

Counts

4 → 38

Calls

Call 1

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

Outputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a 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 (/ (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 (* 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 (* 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 (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 (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 (* 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)))))

Calls

9 calls:

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

simplify224.0ms (2.5%)

Memory

-31.3MiB live, 158.3MiB allocated; 43ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	254	1100
1	737	1062
2	2646	995
0	8159	958

Stop Event

1×	iter limit
1×	node limit

Counts

38 → 38

Calls

Call 1

Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a 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 (/ (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 (* 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 (* 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 (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 (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 (* 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)))))

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

rewrite221.0ms (2.5%)

Memory

18.3MiB live, 207.6MiB allocated; 38ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	8	22
0	13	22
1	46	22
2	268	22
3	2916	22
0	8112	22

Stop Event

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

Counts

4 → 182

Calls

Call 1

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

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

eval32.0ms (0.4%)

Memory: 9.0MiB live, 53.8MiB allocated; 8ms collecting garbage
Compiler: Compiled 5 333 to 1 037 computations (80.6% saved)

prune49.0ms (0.6%)

Memory

-28.7MiB live, 38.4MiB allocated; 14ms collecting garbage

Pruning

27 alts after pruning (27 fresh and 0 done)

	Pruned	Kept	Total
New	187	27	214
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	188	27	215

Accuracy

99.8%

Counts

215 → 27

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
	74.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 (-.f64 b a)) (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64))))
	72.5%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
▶	72.6%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
	8.6%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
▶	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
	99.3%	(.f64 r (/.f64 (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))))))))
	99.5%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶	36.0%	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
	36.8%	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a) b))))
▶	51.3%	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	50.1%	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) a) (sin.f64 b)) a (cos.f64 b)))))
	51.5%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
	51.3%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
	54.5%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 b))))
	53.9%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 a))))
	10.9%	(*.f64 r (/.f64 (cos.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b))))
	50.3%	(*.f64 r (/.f64 #s(approx (sin b) (fma.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal -1/6 binary64) b)) (cos.f64 (+.f64 a b))))
	50.4%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	74.8%	(.f64 r (.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 (-.f64 b a)) (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)))))
	72.5%	(.f64 r (.f64 (/.f64 (sin.f64 b) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a))))
	50.5%	(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
	50.3%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (+.f64 (/.f64 (*.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b)))
	49.2%	#s(approx (* r (/ (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)) (/.f64 r (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) #s(literal -1/3 binary64) (.f64 (.f64 r (fma.f64 (/.f64 (sin.f64 b) (cos.f64 b)) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (/.f64 (sin.f64 b) (cos.f64 b)) #s(literal 3 binary64))))) (/.f64 (sin.f64 b) (cos.f64 b))))) (.f64 r (fma.f64 (/.f64 (sin.f64 b) (cos.f64 b)) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (/.f64 (sin.f64 b) (cos.f64 b)) #s(literal 3 binary64)))))) a (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (/.f64 r (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))))
▶	50.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
	54.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (sin.f64 b) (/.f64 r (cos.f64 b))))

Compiler

Compiled 1 148 to 750 computations (34.7% saved)

simplify193.0ms (2.2%)

Memory

25.3MiB live, 160.3MiB allocated; 14ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	#s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))
cost-diff	0	(sin.f64 b)
cost-diff	0	(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a))))
cost-diff	0	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
cost-diff	0	(/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
cost-diff	0	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
cost-diff	1	(+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))
cost-diff	3	(sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))
cost-diff	0	(cos.f64 (+.f64 a b))
cost-diff	0	(/.f64 r (cos.f64 (+.f64 a b)))
cost-diff	0	(sin.f64 b)
cost-diff	0	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
cost-diff	0	(cos.f64 a)
cost-diff	0	(/.f64 r (cos.f64 a))
cost-diff	0	(*.f64 (/.f64 r (cos.f64 a)) b)
cost-diff	0	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
cost-diff	0	(fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)))
cost-diff	0	(sin.f64 b)
cost-diff	0	(/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))))
cost-diff	0	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	41	283
0	73	283
1	123	283
2	199	283
3	361	271
4	760	271
5	1919	271
6	4360	271
7	7926	271
0	8027	269

Stop Event

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

Calls

Call 1

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

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

localize327.0ms (3.7%)

Memory

-16.1MiB live, 315.2MiB allocated; 46ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.12890625	(.f64 (.f64 (cos.f64 a) #s(literal -1/2 binary64)) b)
accuracy	0.203125	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a))))
accuracy	31.54839175494685	#s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))
accuracy	0.00390625	(+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))
accuracy	0.203125	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
accuracy	44.91825870237207	(sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))
accuracy	0.0	(sin.f64 b)
accuracy	0.17578125	(/.f64 r (cos.f64 (+.f64 a b)))
accuracy	0.1953125	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
accuracy	17.44189337164995	(cos.f64 (+.f64 a b))
accuracy	0.00390625	(cos.f64 a)
accuracy	0.08984375	(/.f64 r (cos.f64 a))
accuracy	0.12890625	(*.f64 (/.f64 r (cos.f64 a)) b)
accuracy	31.62561575461947	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
accuracy	0.06640625	(*.f64 (cos.f64 b) (cos.f64 a))
accuracy	0.11995735864277479	(fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)))
accuracy	0.203125	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))))

Samples

277.0ms	200×	1	valid
16.0ms	56×	0	valid

Compiler

Compiled 240 to 38 computations (84.2% saved)

Precisions

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

adjust: 65.0ms (28.3% of total)

ival-sub: 44.0ms (19.2% of total)

ival-sin: 27.0ms (11.8% of total)

ival-cos: 26.0ms (11.3% of total)

ival-mult: 25.0ms (10.9% of total)

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

ival-div: 18.0ms (7.8% of total)

ival-pi: 2.0ms (0.9% of total)

ival-neg: 2.0ms (0.9% of total)

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

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

exact: 0.0ms (0% of total)

series123.0ms (1.4%)

Memory

36.3MiB live, 81.9MiB allocated; 9ms collecting garbage

Counts

20 → 154

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
62.0ms	r	@	-inf	((* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (cos a) (* (sin b) (/ r (cos (+ a b)))) (/ r (cos (+ a b))) (cos (+ a b)) (sin (- (+ (neg b) (/ (PI) 2)) a)) (+ (neg b) (/ (PI) 2)) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (* (cos b) (cos a)) (* (* (cos a) -1/2) b))
13.0ms	b	@	inf	((* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (cos a) (* (sin b) (/ r (cos (+ a b)))) (/ r (cos (+ a b))) (cos (+ a b)) (sin (- (+ (neg b) (/ (PI) 2)) a)) (+ (neg b) (/ (PI) 2)) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (* (cos b) (cos a)) (* (* (cos a) -1/2) b))
7.0ms	a	@	inf	((* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (cos a) (* (sin b) (/ r (cos (+ a b)))) (/ r (cos (+ a b))) (cos (+ a b)) (sin (- (+ (neg b) (/ (PI) 2)) a)) (+ (neg b) (/ (PI) 2)) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (* (cos b) (cos a)) (* (* (cos a) -1/2) b))
6.0ms	b	@	0	((* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (cos a) (* (sin b) (/ r (cos (+ a b)))) (/ r (cos (+ a b))) (cos (+ a b)) (sin (- (+ (neg b) (/ (PI) 2)) a)) (+ (neg b) (/ (PI) 2)) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (* (cos b) (cos a)) (* (* (cos a) -1/2) b))
6.0ms	a	@	-inf	((* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (cos a) (* (sin b) (/ r (cos (+ a b)))) (/ r (cos (+ a b))) (cos (+ a b)) (sin (- (+ (neg b) (/ (PI) 2)) a)) (+ (neg b) (/ (PI) 2)) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (* (cos b) (cos a)) (* (* (cos a) -1/2) b))

simplify203.0ms (2.3%)

Memory

-17.0MiB live, 168.0MiB allocated; 26ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	765	5563
1	2227	5291
0	8384	5087

Stop Event

1×	iter limit
1×	node limit

Counts

154 → 154

Calls

Call 1

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

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

rewrite109.0ms (1.2%)

Memory

-9.7MiB live, 53.9MiB allocated; 17ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	41	204
0	73	218
1	238	183
0	1704	183

Stop Event

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

Counts

20 → 202

Calls

Call 1

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

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

eval50.0ms (0.6%)

Memory: 12.3MiB live, 98.2MiB allocated; 15ms collecting garbage
Compiler: Compiled 10 004 to 1 555 computations (84.5% saved)

prune76.0ms (0.9%)

Memory

-20.6MiB live, 87.6MiB allocated; 12ms collecting garbage

Pruning

61 alts after pruning (59 fresh and 2 done)

	Pruned	Kept	Total
New	294	46	340
Fresh	9	13	22
Picked	3	2	5
Done	0	0	0
Total	306	61	367

Accuracy

99.9%

Counts

367 → 61

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
	74.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 (-.f64 b a)) (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64))))
	99.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))))
▶	72.5%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
	72.6%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))
	50.0%	(.f64 (sin.f64 b) (/.f64 r #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)))))
	50.1%	(.f64 (sin.f64 b) (/.f64 r #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)))))
	51.5%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
	51.3%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
	54.5%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 b))))
	53.9%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 a))))
	50.3%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
▶	50.3%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	50.3%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	50.4%	(*.f64 #s(approx (sin b) b) (/.f64 r (cos.f64 (+.f64 a b))))
	8.6%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
	99.3%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.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)))))))))
✓	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
	51.4%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) b) b #s(literal 1 binary64)) (cos.f64 a))))))
	55.8%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (cos.f64 b)))))
	55.1%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (cos.f64 a)))))
▶	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
	54.1%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (neg.f64 (sin.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)))))
	55.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
	62.4%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 #s(approx (sin b) b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
	99.3%	(.f64 r (/.f64 (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 (neg.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 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
	99.5%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	34.7%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 #s(approx (+ (neg b) (/ (PI) 2)) (.f64 #s(literal 1/2 binary64) (PI.f64))) a))))
	15.9%	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 #s(approx (+ (neg b) (/ (PI) 2)) (neg.f64 b)) a))))
	36.8%	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a) b))))
	54.5%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))))
	53.9%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 a))))
	36.2%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (sin (- (+ (neg b) (/ (PI) 2)) a)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b))))))
	10.9%	(*.f64 r (/.f64 (cos.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b))))
	50.3%	(*.f64 r (/.f64 #s(approx (sin b) (fma.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal -1/6 binary64) b)) (cos.f64 (+.f64 a b))))
	49.9%	(.f64 r (/.f64 #s(approx (sin b) (.f64 (fma.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 (cos (+ a b)) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	31.4%	(.f64 r (/.f64 #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
	50.4%	(.f64 r (/.f64 #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	31.6%	(*.f64 r (/.f64 #s(approx (sin b) b) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
	50.4%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	51.0%	(.f64 r (/.f64 #s(approx (sin b) b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	74.8%	(.f64 r (.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 (-.f64 b a)) (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)))))
	99.2%	(.f64 r (.f64 (/.f64 (sin.f64 b) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)))))
	72.5%	(.f64 r (.f64 (/.f64 (sin.f64 b) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a))))
	72.5%	(.f64 r (.f64 (/.f64 (sin.f64 b) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a)))))
	50.5%	(.f64 r #s(approx (/ (sin b) (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a)))) (/.f64 b (cos.f64 a))))
	31.7%	(.f64 r #s(approx (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (/.f64 b (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
	50.3%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (+.f64 (/.f64 (*.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b)))
▶	36.0%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b)))))
	36.2%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)))))
	50.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
	50.3%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r (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)))))) b))
	31.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))) b))
	31.7%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) b))
✓	50.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
	29.9%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (fma.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)))) b))
	30.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 a a) #s(literal -1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) b))
	29.9%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) b))
▶	32.1%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (/ r (cos a)) r) b))
	24.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (/ r (cos a)) b) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r))))

Compiler

Compiled 2 782 to 1 940 computations (30.3% saved)

simplify188.0ms (2.1%)

Memory

2.1MiB live, 185.3MiB allocated; 36ms collecting garbage

Localize:

Found 19 expressions of interest:

New	Metric	Score
cost-diff	0	(sin.f64 b)
cost-diff	0	(*.f64 (sin.f64 b) r)
cost-diff	0	(/.f64 (.f64 (sin.f64 b) r) (.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))
cost-diff	10	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
cost-diff	0	(sin.f64 b)
cost-diff	0	(*.f64 (sin.f64 b) r)
cost-diff	0	(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b))))
cost-diff	0	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b)))))
cost-diff	0	(fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64))
cost-diff	0	#s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
cost-diff	0	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
cost-diff	2	(.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)
cost-diff	0	#s(approx (/ r (cos a)) r)
cost-diff	0	(*.f64 #s(approx (/ r (cos a)) r) b)
cost-diff	0	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (/ r (cos a)) r) b))
cost-diff	0	(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
cost-diff	0	(sin.f64 b)
cost-diff	0	(/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
cost-diff	0	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	57	324
0	93	324
1	169	324
2	365	316
3	970	307
4	3132	306
5	7919	306
0	8006	303

Stop Event

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

Calls

Call 1

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

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

localize366.0ms (4.1%)

Memory

-23.0MiB live, 422.6MiB allocated; 64ms collecting garbage

Localize:

Found 19 expressions of interest:

New	Metric	Score
accuracy	0.26171875	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
accuracy	0.340507519536884	(*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))
accuracy	17.400802415207355	(cos.f64 (-.f64 b a))
accuracy	17.44189337164995	(cos.f64 (+.f64 a b))
accuracy	0.0078125	(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b))
accuracy	0.125	(*.f64 (sin.f64 b) r)
accuracy	0.26171875	(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b))))
accuracy	44.91825870237207	(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b)))
accuracy	0.17578125	(/.f64 r (cos.f64 (+.f64 a b)))
accuracy	0.1953125	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
accuracy	17.44189337164995	(cos.f64 (+.f64 a b))
accuracy	31.594051947345445	#s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
accuracy	0.12890625	(*.f64 #s(approx (/ r (cos a)) r) b)
accuracy	31.62561575461947	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (/ r (cos a)) r) b))
accuracy	32.32242983042805	#s(approx (/ r (cos a)) r)
accuracy	0.11345466452874396	(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
accuracy	0.203125	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
accuracy	0.23046875	(*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))

Samples

281.0ms	200×	1	valid
24.0ms	56×	0	valid

Compiler

Compiled 282 to 54 computations (80.9% saved)

Precisions

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

ival-cos: 45.0ms (20.3% of total)

ival-div: 39.0ms (17.6% of total)

ival-sin: 39.0ms (17.6% of total)

ival-mult: 37.0ms (16.7% of total)

adjust: 29.0ms (13.1% of total)

ival-add: 12.0ms (5.4% of total)

const: 9.0ms (4.1% of total)

ival-sub: 6.0ms (2.7% of total)

ival-neg: 3.0ms (1.4% of total)

ival-pi: 2.0ms (0.9% of total)

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

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

exact: 0.0ms (0% of total)

series53.0ms (0.6%)

Memory

37.4MiB live, 83.8MiB allocated; 5ms collecting garbage

Counts

23 → 201

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
7.0ms	a	@	inf	((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (* (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) b) (* (sin b) (/ r (cos (+ a b)))) (sin b) (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (* (sin b) r) (sin (+ (* 1/2 (PI)) (- (neg a) b)))) (* (sin b) r) (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (* (neg (sin a)) (sin b)) (cos (+ a b)) (/ r (cos (+ a b))) (sin (+ (* 1/2 (PI)) (- (neg a) b))) (+ (* 1/2 (PI)) (- (neg a) b)) (cos (- b a)) (* (cos (- b a)) (cos (+ a b))))
6.0ms	r	@	-inf	((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (* (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) b) (* (sin b) (/ r (cos (+ a b)))) (sin b) (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (* (sin b) r) (sin (+ (* 1/2 (PI)) (- (neg a) b)))) (* (sin b) r) (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (* (neg (sin a)) (sin b)) (cos (+ a b)) (/ r (cos (+ a b))) (sin (+ (* 1/2 (PI)) (- (neg a) b))) (+ (* 1/2 (PI)) (- (neg a) b)) (cos (- b a)) (* (cos (- b a)) (cos (+ a b))))
6.0ms	r	@	inf	((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (* (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) b) (* (sin b) (/ r (cos (+ a b)))) (sin b) (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (* (sin b) r) (sin (+ (* 1/2 (PI)) (- (neg a) b)))) (* (sin b) r) (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (* (neg (sin a)) (sin b)) (cos (+ a b)) (/ r (cos (+ a b))) (sin (+ (* 1/2 (PI)) (- (neg a) b))) (+ (* 1/2 (PI)) (- (neg a) b)) (cos (- b a)) (* (cos (- b a)) (cos (+ a b))))
5.0ms	r	@	0	((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (* (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) b) (* (sin b) (/ r (cos (+ a b)))) (sin b) (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (* (sin b) r) (sin (+ (* 1/2 (PI)) (- (neg a) b)))) (* (sin b) r) (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (* (neg (sin a)) (sin b)) (cos (+ a b)) (/ r (cos (+ a b))) (sin (+ (* 1/2 (PI)) (- (neg a) b))) (+ (* 1/2 (PI)) (- (neg a) b)) (cos (- b a)) (* (cos (- b a)) (cos (+ a b))))
5.0ms	b	@	0	((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (/ r (cos a)) (* (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) b) (* (sin b) (/ r (cos (+ a b)))) (sin b) (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/ (* (sin b) r) (sin (+ (* 1/2 (PI)) (- (neg a) b)))) (* (sin b) r) (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (* (neg (sin a)) (sin b)) (cos (+ a b)) (/ r (cos (+ a b))) (sin (+ (* 1/2 (PI)) (- (neg a) b))) (+ (* 1/2 (PI)) (- (neg a) b)) (cos (- b a)) (* (cos (- b a)) (cos (+ a b))))

simplify201.0ms (2.3%)

Memory

13.9MiB live, 194.2MiB allocated; 24ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	980	7739
1	3038	7544
0	8321	7244

Stop Event

1×	iter limit
1×	node limit

Counts

201 → 201

Calls

Call 1

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

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

rewrite119.0ms (1.3%)

Memory

-24.1MiB live, 122.5MiB allocated; 18ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	57	260
0	93	229
1	330	229
0	2607	229

Stop Event

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

Counts

23 → 329

Calls

Call 1

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

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

eval112.0ms (1.3%)

Memory: -21.2MiB live, 125.3MiB allocated; 20ms collecting garbage
Compiler: Compiled 18 706 to 2 268 computations (87.9% saved)

prune79.0ms (0.9%)

Memory

37.1MiB live, 168.5MiB allocated; 14ms collecting garbage

Pruning

81 alts after pruning (77 fresh and 4 done)

	Pruned	Kept	Total
New	491	38	529
Fresh	15	39	54
Picked	3	2	5
Done	0	2	2
Total	509	81	590

Accuracy

100.0%

Counts

590 → 81

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
	72.6%	(/.f64 (.f64 (cos.f64 (-.f64 b a)) (.f64 (sin.f64 b) r)) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))
	99.4%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (cos.f64 (-.f64 b a)) (.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (-.f64 b a))))) (cos.f64 (-.f64 b a)))
	99.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (-.f64 b a)) (.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (cos.f64 (-.f64 b a))))) (cos.f64 (-.f64 b a)))
	35.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 b (-.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a)))) (cos.f64 (+.f64 (-.f64 b (-.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) #s(literal 2 binary64))) (cos.f64 (-.f64 b a)))
	72.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 b a) (neg.f64 (+.f64 a b)))) (cos.f64 (-.f64 (-.f64 b a) (neg.f64 (+.f64 a b))))) #s(literal 2 binary64))) (cos.f64 (-.f64 b a)))
	99.2%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (/.f64 (.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))) (cos.f64 (-.f64 b a))) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))))) (cos.f64 (-.f64 b a)))
	99.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))))
	35.9%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a) b)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
	35.5%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a) b)))
	36.6%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (sin.f64 (-.f64 b (-.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))))
	54.1%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(approx (cos (- b a)) (cos.f64 b)))
	72.6%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))
	54.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 #s(approx (cos (- b a)) (cos.f64 b)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
	53.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 #s(approx (cos (- b a)) (cos.f64 a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
	54.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) #s(approx (* (cos (- b a)) (cos (+ a b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (cos.f64 (-.f64 b a)))
	55.9%	(.f64 (/.f64 (.f64 (sin.f64 b) r) #s(approx (* (cos (- b a)) (cos (+ a b))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (cos.f64 (-.f64 b a)))
	72.2%	(.f64 (/.f64 (.f64 (cos.f64 (-.f64 b a)) (*.f64 (sin.f64 b) r)) (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 b a) a) b)) (cos.f64 (-.f64 b (-.f64 a (+.f64 a b)))))) #s(literal 2 binary64))
	72.6%	(.f64 (.f64 (/.f64 (/.f64 r (cos.f64 (+.f64 a b))) (cos.f64 (-.f64 b a))) (sin.f64 b)) (cos.f64 (-.f64 b a)))
	72.5%	(.f64 (.f64 (cos.f64 (-.f64 b a)) (sin.f64 b)) (/.f64 (/.f64 r (cos.f64 (+.f64 a b))) (cos.f64 (-.f64 b a))))
	72.6%	(.f64 (.f64 r (/.f64 (sin.f64 b) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) (cos.f64 (-.f64 b a)))
	50.0%	(.f64 (sin.f64 b) (/.f64 r #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)))))
	50.1%	(.f64 (sin.f64 b) (/.f64 r #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)))))
	51.3%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
	54.5%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 b))))
	53.9%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 a))))
	50.5%	(.f64 #s(approx (/ ( (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (*.f64 b (/.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (cos.f64 (-.f64 b a)))
	50.3%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	50.0%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r #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)))))
	50.2%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r #s(approx (cos (+ a b)) (fma.f64 (sin.f64 a) (neg.f64 b) (cos.f64 a)))))
	31.9%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 b))))
	50.2%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (*.f64 (/.f64 (/.f64 r (cos.f64 (+.f64 a b))) (cos.f64 (-.f64 b a))) (cos.f64 (-.f64 b a))))
	50.3%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	50.4%	(.f64 #s(approx (sin b) #s(approx ( (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) b) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	8.6%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
	99.3%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.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)))))))))
✓	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
	51.4%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) b) b #s(literal 1 binary64)) (cos.f64 a))))))
	55.8%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (cos.f64 b)))))
	55.1%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (cos.f64 a)))))
✓	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
	54.1%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))))))
▶	55.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))))))
	62.4%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) b)))))
	59.7%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) #s(approx ( (neg (sin a)) (sin b)) (*.f64 (neg.f64 (sin.f64 b)) a)))))
	99.4%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
▶	99.5%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	34.7%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 #s(approx (+ (neg b) (/ (PI) 2)) (.f64 #s(literal 1/2 binary64) (PI.f64))) a))))
	15.9%	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 #s(approx (+ (neg b) (/ (PI) 2)) (neg.f64 b)) a))))
	36.8%	(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a) b))))
▶	54.5%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))))
	53.9%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 a))))
	36.2%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (sin (- (+ (neg b) (/ (PI) 2)) a)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b))))))
	10.9%	(*.f64 r (/.f64 (cos.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b))))
	50.3%	(*.f64 r (/.f64 #s(approx (sin b) (fma.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal -1/6 binary64) b)) (cos.f64 (+.f64 a b))))
	50.4%	(.f64 r (/.f64 #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	31.6%	(*.f64 r (/.f64 #s(approx (sin b) b) (sin.f64 (-.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
	50.4%	(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
	51.0%	(.f64 r (/.f64 #s(approx (sin b) b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	74.8%	(.f64 r (.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 (-.f64 b a)) (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)))))
	99.2%	(.f64 r (.f64 (/.f64 (sin.f64 b) (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))))
	72.5%	(.f64 r (.f64 (/.f64 (sin.f64 b) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a)))))
	50.5%	(.f64 r #s(approx (/ (sin b) (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a)))) (/.f64 b (cos.f64 a))))
	31.7%	(.f64 r #s(approx (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (/.f64 b (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
▶	50.3%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (+.f64 (/.f64 (*.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b)))
	54.5%	#s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))
	35.3%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 a))))))
	29.6%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b))))))
	16.3%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (neg.f64 b)))))
	17.0%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (neg.f64 a)))))
	31.4%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b)))))
	31.6%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (*.f64 #s(approx (sin b) b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 a) b)))))
	50.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
	31.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))) b))
	31.7%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) b))
✓	50.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
	29.9%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (fma.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)))) b))
	30.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 a a) #s(literal -1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) b))
	29.9%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) b))
✓	32.1%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (/ r (cos a)) r) b))
▶	24.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (/ r (cos a)) b) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r))))

Compiler

Compiled 3 976 to 2 741 computations (31.1% saved)

simplify130.0ms (1.5%)

Memory

12.0MiB live, 165.9MiB allocated; 24ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(sin.f64 b)
cost-diff	0	(/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)))))
cost-diff	0	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))))))
cost-diff	2	(.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
cost-diff	0	(.f64 (/.f64 (+.f64 (/.f64 (.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b)
cost-diff	0	#s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (+.f64 (/.f64 (.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b))
cost-diff	0	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (+.f64 (/.f64 (*.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b)))
cost-diff	1	(+.f64 (/.f64 (*.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64))
cost-diff	0	#s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))
cost-diff	0	(sin.f64 b)
cost-diff	0	(/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b)))
cost-diff	0	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))))
cost-diff	0	(fma.f64 (*.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r))
cost-diff	0	#s(approx (* (/ r (cos a)) b) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r)))
cost-diff	0	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (/ r (cos a)) b) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r))))
cost-diff	0	(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))
cost-diff	0	(sin.f64 b)
cost-diff	0	(/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b))))
cost-diff	0	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	54	419
0	87	416
1	168	416
2	339	416
3	845	410
4	3127	410
0	8072	399

Stop Event

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

Calls

Call 1

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

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

localize261.0ms (2.9%)

Memory

-32.0MiB live, 349.0MiB allocated; 37ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.203125	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)))))
accuracy	0.23046875	(.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)))
accuracy	31.595630038462627	#s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
accuracy	0.1796875	(*.f64 (sin.f64 a) b)
accuracy	0.203125	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (+.f64 (/.f64 (*.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b)))
accuracy	0.21941376953688405	(/.f64 (*.f64 (sin.f64 a) b) (cos.f64 a))
accuracy	31.850598625513786	#s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (+.f64 (/.f64 (.f64 (sin.f64 a) b) (cos.f64 a)) #s(literal 1 binary64)) (cos.f64 a)) b))
accuracy	0.0	(cos.f64 b)
accuracy	0.203125	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b)))
accuracy	32.964632234838064	#s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))
accuracy	0.0	(*.f64 #s(literal 1/2 binary64) a)
accuracy	7.221438377916928	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r))
accuracy	31.62561575461947	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (/ r (cos a)) b) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r))))
accuracy	33.519613716681256	#s(approx (* (/ r (cos a)) b) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r)))
accuracy	0.12169850823848477	(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))
accuracy	0.203125	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
accuracy	0.228847509768442	(/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b))))
accuracy	0.23046875	(*.f64 (sin.f64 a) (sin.f64 b))

Samples

202.0ms	195×	1	valid
19.0ms	61×	0	valid

Compiler

Compiled 315 to 46 computations (85.4% saved)

Precisions

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

ival-mult: 42.0ms (25.1% of total)

ival-div: 28.0ms (16.7% of total)

ival-cos: 28.0ms (16.7% of total)

ival-add: 23.0ms (13.7% of total)

adjust: 22.0ms (13.1% of total)

ival-sin: 15.0ms (8.9% of total)

const: 5.0ms (3% of total)

ival-sub: 2.0ms (1.2% of total)

ival-neg: 1.0ms (0.6% of total)

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

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

exact: 0.0ms (0% of total)

series66.0ms (0.7%)

Memory

0.8MiB live, 144.7MiB allocated; 18ms collecting garbage

Counts

25 → 169

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
12.0ms	a	@	-inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (* (+ (* (* 1/2 a) a) 1) (* b r)) (+ (* (* 1/2 a) a) 1) (* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (+ (/ (* (sin a) b) (cos a)) 1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (/ (+ (/ (* (sin a) b) (cos a)) 1) (cos a)) b) (* (+ (* (* b b) -1/6) 1) b) (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (* (sin a) (sin b)) (* 1/2 a) (cos b) (/ (* (sin a) b) (cos a)) (* (sin a) b) (sin b) (* (neg (sin a)) (sin b)))
9.0ms	r	@	-inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (* (+ (* (* 1/2 a) a) 1) (* b r)) (+ (* (* 1/2 a) a) 1) (* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (+ (/ (* (sin a) b) (cos a)) 1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (/ (+ (/ (* (sin a) b) (cos a)) 1) (cos a)) b) (* (+ (* (* b b) -1/6) 1) b) (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (* (sin a) (sin b)) (* 1/2 a) (cos b) (/ (* (sin a) b) (cos a)) (* (sin a) b) (sin b) (* (neg (sin a)) (sin b)))
8.0ms	b	@	-inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (* (+ (* (* 1/2 a) a) 1) (* b r)) (+ (* (* 1/2 a) a) 1) (* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (+ (/ (* (sin a) b) (cos a)) 1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (/ (+ (/ (* (sin a) b) (cos a)) 1) (cos a)) b) (* (+ (* (* b b) -1/6) 1) b) (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (* (sin a) (sin b)) (* 1/2 a) (cos b) (/ (* (sin a) b) (cos a)) (* (sin a) b) (sin b) (* (neg (sin a)) (sin b)))
7.0ms	b	@	0	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (* (+ (* (* 1/2 a) a) 1) (* b r)) (+ (* (* 1/2 a) a) 1) (* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (+ (/ (* (sin a) b) (cos a)) 1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (/ (+ (/ (* (sin a) b) (cos a)) 1) (cos a)) b) (* (+ (* (* b b) -1/6) 1) b) (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (* (sin a) (sin b)) (* 1/2 a) (cos b) (/ (* (sin a) b) (cos a)) (* (sin a) b) (sin b) (* (neg (sin a)) (sin b)))
7.0ms	a	@	inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (sin b) (- (* (cos b) (cos a)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (* (/ r (cos a)) b) (* (+ (* (* 1/2 a) a) 1) (* b r)) (+ (* (* 1/2 a) a) 1) (* r (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))))) (/ (sin b) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a)))) (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) (+ (/ (* (sin a) b) (cos a)) 1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (/ (+ (/ (* (sin a) b) (cos a)) 1) (cos a)) b) (* (+ (* (* b b) -1/6) 1) b) (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b))))) (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin a)) (sin b)))) (* (sin a) (sin b)) (* 1/2 a) (cos b) (/ (* (sin a) b) (cos a)) (* (sin a) b) (sin b) (* (neg (sin a)) (sin b)))

simplify184.0ms (2.1%)

Memory

7.0MiB live, 149.5MiB allocated; 25ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	650	5745
1	1870	5501
2	7235	5469
0	8248	5219

Stop Event

1×	iter limit
1×	node limit

Counts

169 → 169

Calls

Call 1

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

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

rewrite159.0ms (1.8%)

Memory

18.7MiB live, 210.3MiB allocated; 26ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	54	328
0	87	283
1	273	283
2	1873	268
0	8155	264

Stop Event

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

Counts

25 → 269

Calls

Call 1

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

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

eval87.0ms (1%)

Memory: -18.0MiB live, 71.9MiB allocated; 9ms collecting garbage
Compiler: Compiled 12 505 to 2 079 computations (83.4% saved)

prune135.0ms (1.5%)

Memory

4.3MiB live, 148.8MiB allocated; 16ms collecting garbage

Pruning

82 alts after pruning (75 fresh and 7 done)

	Pruned	Kept	Total
New	424	17	441
Fresh	14	58	72
Picked	2	3	5
Done	0	4	4
Total	440	82	522

Accuracy

100.0%

Counts

522 → 82

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.7%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
	54.5%	(/.f64 (.f64 (sin.f64 b) r) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b)))
	72.6%	(/.f64 (.f64 (cos.f64 (-.f64 b a)) (.f64 (sin.f64 b) r)) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))
	99.4%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (cos.f64 (-.f64 b a)) (.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (-.f64 b a))))) (cos.f64 (-.f64 b a)))
	99.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (-.f64 b a)) (.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (cos.f64 (-.f64 b a))))) (cos.f64 (-.f64 b a)))
	35.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 b (-.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a)))) (cos.f64 (+.f64 (-.f64 b (-.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) #s(literal 2 binary64))) (cos.f64 (-.f64 b a)))
	72.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 b a) (neg.f64 (+.f64 a b)))) (cos.f64 (-.f64 (-.f64 b a) (neg.f64 (+.f64 a b))))) #s(literal 2 binary64))) (cos.f64 (-.f64 b a)))
	99.2%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (/.f64 (.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))) (cos.f64 (-.f64 b a))) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))))) (cos.f64 (-.f64 b a)))
	99.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))))
	35.9%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a) b)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
	35.5%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a) b)))
	36.6%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (sin.f64 (-.f64 b (-.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))))
	54.1%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(approx (cos (- b a)) (cos.f64 b)))
	72.6%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))
	54.3%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 #s(approx (cos (- b a)) (cos.f64 b)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
	53.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) (*.f64 #s(approx (cos (- b a)) (cos.f64 a)) (cos.f64 (+.f64 a b)))) (cos.f64 (-.f64 b a)))
	54.8%	(.f64 (/.f64 (.f64 (sin.f64 b) r) #s(approx (* (cos (- b a)) (cos (+ a b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (cos.f64 (-.f64 b a)))
	55.9%	(.f64 (/.f64 (.f64 (sin.f64 b) r) #s(approx (* (cos (- b a)) (cos (+ a b))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (cos.f64 (-.f64 b a)))
	72.2%	(.f64 (/.f64 (.f64 (cos.f64 (-.f64 b a)) (*.f64 (sin.f64 b) r)) (+.f64 (cos.f64 (-.f64 (-.f64 (-.f64 b a) a) b)) (cos.f64 (-.f64 b (-.f64 a (+.f64 a b)))))) #s(literal 2 binary64))
	72.6%	(.f64 (.f64 (/.f64 (/.f64 r (cos.f64 (+.f64 a b))) (cos.f64 (-.f64 b a))) (sin.f64 b)) (cos.f64 (-.f64 b a)))
	72.5%	(.f64 (.f64 (cos.f64 (-.f64 b a)) (sin.f64 b)) (/.f64 (/.f64 r (cos.f64 (+.f64 a b))) (cos.f64 (-.f64 b a))))
	72.6%	(.f64 (.f64 r (/.f64 (sin.f64 b) (*.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) (cos.f64 (-.f64 b a)))
	50.0%	(.f64 (sin.f64 b) (/.f64 r #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)))))
	50.1%	(.f64 (sin.f64 b) (/.f64 r #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)))))
	51.3%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
	54.5%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 b))))
	53.9%	(*.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 a))))
	50.5%	(.f64 #s(approx (/ ( (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (*.f64 b (/.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (cos.f64 (-.f64 b a)))
	31.9%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r #s(approx (cos (+ a b)) (cos.f64 b))))
	50.2%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (*.f64 (/.f64 (/.f64 r (cos.f64 (+.f64 a b))) (cos.f64 (-.f64 b a))) (cos.f64 (-.f64 b a))))
	50.3%	(.f64 #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	50.4%	(.f64 #s(approx (sin b) #s(approx ( (+ (* (+ (* 1/120 (* b b)) -1/6) (* b b)) 1) b) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	8.6%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
	99.3%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.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)))))))))
✓	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
	55.8%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (cos.f64 b)))))
	55.1%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) #s(approx ( (cos b) (cos a)) (cos.f64 a)))))
✓	99.5%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
	54.1%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))))))
	59.7%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) #s(approx ( (neg (sin a)) (sin b)) (*.f64 (neg.f64 (sin.f64 b)) a)))))
	50.8%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 #s(approx (cos b) (fma.f64 (fma.f64 (.f64 b b) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))))))
	50.8%	(.f64 r (/.f64 (sin.f64 b) (fma.f64 #s(approx (cos b) (fma.f64 (.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))))))
	99.4%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
✓	99.5%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	51.4%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 #s(approx (cos b) (fma.f64 (fma.f64 (.f64 b b) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 b b) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	34.7%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 #s(approx (+ (neg b) (/ (PI) 2)) (.f64 #s(literal 1/2 binary64) (PI.f64))) a))))
	53.9%	(.f64 r (/.f64 (sin.f64 b) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (cos.f64 a))))
	37.7%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) b)))))
✓	54.5%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))))
	32.5%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) b) b #s(literal 1/24 binary64)) (.f64 b b) #s(literal -1/2 binary64)) (*.f64 b b) #s(literal 1 binary64))))))
	32.5%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) (fma.f64 (fma.f64 (.f64 b b) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 b b) #s(literal 1 binary64))))))
	32.5%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
	35.9%	(.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))
	36.2%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (sin (- (+ (neg b) (/ (PI) 2)) a)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b))))))
	10.9%	(*.f64 r (/.f64 (cos.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b))))
	51.3%	(.f64 r (/.f64 #s(approx (sin b) (fma.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal -1/6 binary64) b)) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))))))
	50.3%	(*.f64 r (/.f64 #s(approx (sin b) (fma.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal -1/6 binary64) b)) (cos.f64 (+.f64 a b))))
	50.4%	(.f64 r (/.f64 #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	32.0%	(.f64 r (/.f64 #s(approx (sin b) b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) (cos.f64 b))))
	51.0%	(.f64 r (/.f64 #s(approx (sin b) b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (.f64 (*.f64 (cos.f64 a) #s(literal -1/2 binary64)) b) (sin.f64 a)) b (cos.f64 a)))))
	74.8%	(.f64 r (.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 (-.f64 b a)) (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)))))
	99.2%	(.f64 r (.f64 (/.f64 (sin.f64 b) (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))) (fma.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))))
	72.5%	(.f64 r (.f64 (/.f64 (sin.f64 b) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))))) (sin.f64 (-.f64 b (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a)))))
	50.5%	(.f64 r #s(approx (/ (sin b) (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a)))) (/.f64 b (cos.f64 a))))
	31.7%	(.f64 r #s(approx (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a))) (/.f64 b (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
	50.3%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 (fma.f64 b (tan.f64 a) #s(literal 1 binary64)) (cos.f64 a)) b)))
	50.4%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (/.f64 #s(approx (+ (/ (* (sin a) b) (cos a)) 1) #s(literal 1 binary64)) (cos.f64 a)) b)))
	29.6%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx ( (/ (+ (/ (* (sin a) b) (cos a)) 1) (cos a)) b) (fma.f64 (*.f64 b b) a b))))
	35.3%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 a))))))
	29.6%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b))))))
	16.3%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (neg.f64 b)))))
	17.0%	#s(approx (* r (/ (sin b) (sin (- (+ (neg b) (/ (PI) 2)) a)))) (/.f64 (.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ ( 1/2 (PI)) (- (neg a) b)) (neg.f64 a)))))
	50.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
	31.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) a))) b))
✓	50.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
	29.9%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (fma.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)))) b))
	30.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 a a) #s(literal -1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) b))
	29.9%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (/.f64 r #s(approx (cos a) (fma.f64 (.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) b))
✓	32.1%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (/ r (cos a)) r) b))
✓	24.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (/ r (cos a)) b) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) a) a #s(literal 1 binary64)) (*.f64 b r))))
	8.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (/ r (cos a)) b) (.f64 #s(approx (+ ( (* 1/2 a) a) 1) (.f64 (.f64 a a) #s(literal 1/2 binary64))) (*.f64 b r))))
	13.7%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (/ r (cos a)) b) #s(approx (* (+ (* (* 1/2 a) a) 1) (* b r)) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 b r)) a) a))))

Compiler

Compiled 5 450 to 2 088 computations (61.7% saved)

regimes201.0ms (2.3%)

Memory

8.4MiB live, 286.0MiB allocated; 26ms collecting garbage

Counts

129 → 1

Calls

Call 1

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

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

Calls

5 calls:

60.0ms	a
36.0ms	(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
35.0ms	r
33.0ms	b
32.0ms	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes156.0ms (1.7%)

Memory

17.2MiB live, 265.3MiB allocated; 31ms collecting garbage

Counts

112 → 1

Calls

Call 1

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes150.0ms (1.7%)

Memory

-23.2MiB live, 258.2MiB allocated; 22ms collecting garbage

Counts

111 → 1

Calls

Call 1

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes167.0ms (1.9%)

Memory

24.5MiB live, 167.2MiB allocated; 13ms collecting garbage

Counts

110 → 1

Calls

Call 1

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes77.0ms (0.9%)

Memory

5.7MiB live, 93.7MiB allocated; 9ms collecting garbage

Counts

46 → 1

Calls

Call 1

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

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

Calls

5 calls:

24.0ms	r
16.0ms	(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
12.0ms	a
11.0ms	b
11.0ms	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes117.0ms (1.3%)

Memory

-8.1MiB live, 62.7MiB allocated; 41ms collecting garbage

Counts

45 → 1

Calls

Call 1

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes110.0ms (1.2%)

Memory

-24.4MiB live, 111.9MiB allocated; 9ms collecting garbage

Counts

44 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

45.0ms	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
26.0ms	a
14.0ms	b
11.0ms	r
11.0ms	(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))

Results

Accuracy	Segments	Branch
73.0%	3	`b`
72.9%	3	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
60.4%	3	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
61.2%	3	`r`
72.3%	3	`a`

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes11.0ms (0.1%)

Memory

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

Counts

35 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

9.0ms

Results

Accuracy	Segments	Branch
73.0%	3	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes13.0ms (0.1%)

Memory

-27.7MiB live, 26.5MiB allocated; 4ms collecting garbage

Counts

33 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

11.0ms

Results

Accuracy	Segments	Branch
73.0%	3	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes48.0ms (0.5%)

Memory

21.0MiB live, 112.8MiB allocated; 8ms collecting garbage

Counts

32 → 3

Calls

Call 1

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

Outputs

(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))

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

(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes19.0ms (0.2%)

Memory

-1.9MiB live, 44.0MiB allocated; 4ms collecting garbage

Counts

28 → 3

Calls

Call 1

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

Outputs

(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))

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

(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))

Calls

2 calls:

10.0ms	b
7.0ms	(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))

Results

Accuracy	Segments	Branch
54.6%	3	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
54.6%	3	`b`

Compiler

Compiled 8 to 10 computations (-25% saved)

regimes20.0ms (0.2%)

Memory

-16.5MiB live, 32.6MiB allocated; 9ms collecting garbage

Counts

24 → 2

Calls

Call 1

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

Outputs

(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))

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

Calls

2 calls:

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

Results

Accuracy	Segments	Branch
54.4%	3	`b`
52.9%	2	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`

Compiler

Compiled 8 to 10 computations (-25% saved)

regimes18.0ms (0.2%)

Memory

3.5MiB live, 50.4MiB allocated; 2ms collecting garbage

Counts

13 → 1

Calls

Call 1

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 18 to 21 computations (-16.7% saved)

regimes17.0ms (0.2%)

Memory

-1.8MiB live, 45.5MiB allocated; 2ms collecting garbage

Counts

9 → 1

Calls

Call 1

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes15.0ms (0.2%)

Memory

-15.4MiB live, 32.1MiB allocated; 1ms collecting garbage

Accuracy

Total -15.9b remaining (-36.5%)

Threshold costs -15.9b (-36.5%)

Counts

8 → 1

Calls

Call 1

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

bsearch86.0ms (1%)

Memory

11.4MiB live, 61.8MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
62.0ms	15.105001228209737	48.73354119730198
21.0ms	-90.36055746317703	-0.013018506443667357

Samples

54.0ms	82×	0	valid
19.0ms	126×	1	valid

Compiler

Compiled 607 to 439 computations (27.7% saved)

Precisions

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

ival-sin: 52.0ms (77.5% of total)

ival-cos: 7.0ms (10.4% of total)

adjust: 3.0ms (4.5% of total)

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

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

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

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

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

bsearch2.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	15.105001228209737	48.73354119730198
1.0ms	-90.36055746317703	-0.013018506443667357

Compiler

Compiled 647 to 463 computations (28.4% saved)

bsearch2.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	15.105001228209737	48.73354119730198
1.0ms	-90.36055746317703	-0.013018506443667357

Compiler

Compiled 597 to 443 computations (25.8% saved)

bsearch48.0ms (0.5%)

Memory

14.2MiB live, 61.0MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
30.0ms	0.014453652058380197	15.105001228209737
15.0ms	-305.1731585215723	-90.36055746317703

Samples

28.0ms	127×	1	valid
8.0ms	81×	0	valid

Compiler

Compiled 597 to 469 computations (21.4% saved)

Precisions

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

ival-cos: 14.0ms (48% of total)

ival-sin: 7.0ms (24% of total)

adjust: 3.0ms (10.3% of total)

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

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

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.014454658637286589	0.03142412811868047
0.0ms	-0.04983696295588982	-0.014037181190043064

Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.04983696295588982	-0.014037181190043064

Compiler

Compiled 12 to 14 computations (-16.7% saved)

simplify57.0ms (0.6%)

Memory

-9.6MiB live, 82.2MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	110	497
1	175	494
2	288	478
3	544	474
4	1028	474
5	4289	474

Stop Event

1×	node limit

Calls

Call 1

Inputs
(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 b)))) (if (<=.f64 b #s(literal 31/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))))
(if (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))) (if (<=.f64 b #s(literal 31/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))))
(if (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))) (if (<=.f64 b #s(literal 31/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (sin.f64 b) (/.f64 r (cos.f64 b))))))
(if (<=.f64 b #s(literal -180 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) (if (<=.f64 b #s(literal 9/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))))
(if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/144115188075855872 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) (if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))))
(if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/144115188075855872 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (/ r (cos a)) r) b))

Outputs
(.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 b) (neg.f64 (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))))
(.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 b)))) (if (<=.f64 b #s(literal 31/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))))
(if (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))) (if (<=.f64 b #s(literal 31/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))))
(if (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))) (if (<=.f64 b #s(literal 31/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b)))))
(if (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))) (if (<=.f64 b #s(literal 31/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (sin.f64 b) (/.f64 r (cos.f64 b))))))
(if (or (<=.f64 b #s(literal -8286623314361713/72057594037927936 binary64)) (not (<=.f64 b #s(literal 31/2 binary64)))) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (.f64 (sin.f64 b) (/.f64 r (cos.f64 b)))) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 b b) #s(literal 1/120 binary64)) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))))
(if (<=.f64 b #s(literal -180 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) (if (<=.f64 b #s(literal 9/2 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))))
(if (or (<=.f64 b #s(literal -180 binary64)) (not (<=.f64 b #s(literal 9/2 binary64)))) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) (.f64 #s(approx (sin b) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 b b) #s(literal -1/6 binary64)) (.f64 b b) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))))
(if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/144115188075855872 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) (if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 #s(approx (sin b) (.f64 (fma.f64 (.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64)))))))
(if (or (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/144115188075855872 binary64)) (not (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal 5764607523034235/288230376151711744 binary64)))) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) (.f64 #s(approx (sin b) (.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b)))))
(if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/144115188075855872 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a))))
(if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/144115188075855872 binary64)) (.f64 r (/.f64 (sin.f64 b) #s(approx (+ ( (sin b) (neg (sin a))) (* (cos b) (cos a))) #s(approx (cos b) #s(literal 1 binary64))))) #s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 b r) (cos.f64 a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (/ r (cos a)) r) b))
#s(approx (* (/ (* (sin b) r) (* (cos (- b a)) (cos (+ a b)))) (cos (- b a))) (*.f64 #s(approx (/ r (cos a)) r) b))

derivations588.0ms (6.6%)

Memory

39.0MiB live, 455.2MiB allocated; 91ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 557 to 111 computations (80.1% saved)

preprocess82.0ms (0.9%)

Memory: -7.5MiB live, 134.1MiB allocated; 13ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 1 292 to 358 computations (72.3% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze314.0ms (3.5%)

sample1.9s (21.6%)

explain139.0ms (1.6%)

preprocess224.0ms (2.5%)

eval0.0ms (0%)

prune0.0ms (0%)

simplify164.0ms (1.8%)

localize391.0ms (4.4%)

series18.0ms (0.2%)

simplify224.0ms (2.5%)

rewrite221.0ms (2.5%)

eval32.0ms (0.4%)

prune49.0ms (0.6%)

simplify193.0ms (2.2%)

localize327.0ms (3.7%)

series123.0ms (1.4%)

simplify203.0ms (2.3%)

rewrite109.0ms (1.2%)

eval50.0ms (0.6%)

prune76.0ms (0.9%)

simplify188.0ms (2.1%)

localize366.0ms (4.1%)

series53.0ms (0.6%)

simplify201.0ms (2.3%)

rewrite119.0ms (1.3%)

eval112.0ms (1.3%)

prune79.0ms (0.9%)

simplify130.0ms (1.5%)

localize261.0ms (2.9%)

series66.0ms (0.7%)

simplify184.0ms (2.1%)

rewrite159.0ms (1.8%)

eval87.0ms (1%)

prune135.0ms (1.5%)

regimes201.0ms (2.3%)

regimes156.0ms (1.7%)

regimes150.0ms (1.7%)

regimes167.0ms (1.9%)

regimes77.0ms (0.9%)

regimes117.0ms (1.3%)

regimes110.0ms (1.2%)

regimes11.0ms (0.1%)

regimes13.0ms (0.1%)

regimes48.0ms (0.5%)

regimes19.0ms (0.2%)

regimes20.0ms (0.2%)

regimes18.0ms (0.2%)

regimes17.0ms (0.2%)

regimes15.0ms (0.2%)

bsearch86.0ms (1%)

bsearch2.0ms (0%)

bsearch2.0ms (0%)

bsearch48.0ms (0.5%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

simplify57.0ms (0.6%)

derivations588.0ms (6.6%)

preprocess82.0ms (0.9%)

end0.0ms (0%)

Profiling