Metrics for rsin B (should all be same)

start0.0ms (0%)

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

analyze255.0ms (0.4%)

Memory

40.5MiB live, 311.7MiB allocated; 45ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 11 to 10 computations (9.1% saved)

sample2.2s (3.4%)

Memory

17.9MiB live, 1 887.8MiB allocated; 937ms collecting garbage

Samples

1.6s	6 058×	1	valid
146.0ms	2 198×	0	valid

Precisions

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

ival-cos: 298.0ms (26.5% of total)

ival-sin: 251.0ms (22.3% of total)

adjust: 227.0ms (20.2% of total)

ival-div: 162.0ms (14.4% of total)

ival-mult: 96.0ms (8.5% of total)

ival-add: 89.0ms (7.9% of total)

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

Bogosity

explain134.0ms (0.2%)

Memory

17.7MiB live, 180.3MiB allocated; 15ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
65	125	(4.226524818432232e-59 6.573392605506212e-146 3.172759713208287e+296)	-	`(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	190	0

Confusion

	Predicted +	Predicted -
+	65	0
-	125	66

Precision

0.34210526315789475

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	65	0	0
-	125	0	66

Precision?

0.34210526315789475

Recall?

1.0

Freqs

test

number	freq
0	66
1	190

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

72.0ms	370×	1	valid
10.0ms	142×	0	valid

Compiler

Compiled 69 to 28 computations (59.4% saved)

Precisions

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

ival-cos: 16.0ms (27.3% of total)

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

ival-mult: 11.0ms (18.8% of total)

adjust: 9.0ms (15.4% of total)

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

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

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

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

preprocess229.0ms (0.4%)

Memory

0.2MiB live, 180.1MiB allocated; 27ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	38	97
1	103	97
2	206	97
3	428	97
4	770	97
5	1630	97
6	3491	97
7	6517	97
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.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Compiler

Compiled 9 to 8 computations (11.1% saved)

series24.0ms (0%)

Memory

-7.3MiB live, 35.3MiB allocated; 8ms collecting garbage

Counts

8 → 48

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
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (+ a 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 b #s(hole binary64 b))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))

Calls

9 calls:

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

rewrite190.0ms (0.3%)

Memory

19.2MiB live, 210.5MiB allocated; 31ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	283	1294
0	290	1148
1	1652	1098
0	8821	1057

Stop Event

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

Counts

56 → 82

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
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (+ a 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 b #s(hole binary64 b))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))

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

eval12.0ms (0%)

Memory: -29.4MiB live, 17.1MiB allocated; 3ms collecting garbage
Compiler: Compiled 1 758 to 422 computations (76% saved)

prune42.0ms (0.1%)

Memory

-5.1MiB live, 50.7MiB allocated; 4ms collecting garbage

Pruning

6 alts after pruning (6 fresh and 0 done)

	Pruned	Kept	Total
New	78	6	84
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	79	6	85

Accuracy

99.8%

Counts

85 → 6

Alt Table

Click to see full alt table

Status	Accuracy	Program
	78.3%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
▶	99.4%	(.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))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
▶	99.6%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶	48.8%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
▶	59.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
▶	48.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))

Compiler

Compiled 694 to 300 computations (56.8% saved)

series334.0ms (0.5%)

Memory

42.2MiB live, 413.8MiB allocated; 63ms collecting garbage

Counts

92 → 578

Calls

Call 1

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

Outputs
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* r (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* r (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* r (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* r (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* -1 (/ (* r (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (/ (* r (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* r (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (* r (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (* -1/6 (/ r (cos a)))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* r (pow (sin a) 2))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* r (+ (* 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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* r (+ (* 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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* r (- (+ (* -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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* -1 (* a (* r (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* r (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* r (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (/ (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* r (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* b (+ (* -1 (/ (sin a) (pow (cos a) 2))) (* b (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))) (/ 1 (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* b (+ (* -1 (/ (sin a) (pow (cos a) 2))) (* b (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))) (/ 1 (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin a) (pow (cos a) 2))) (* b (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* -1 (* r (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a)))))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (/ (* r (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a)))))) (cos a))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* -1 (/ (* r (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a)))))) (cos a)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* -1 (* r (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a)))))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (* -1 (* r (- (* 1/2 (/ 1 (cos a))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* a (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* -1 (/ (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))) (cos b)))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* -1 (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* -1 (* r (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin 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)) (* (sin b) (sin 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)) (* (sin b) (sin 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 (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r))))))) (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (* b (- (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r))) (* -1/2 r)))) (* (pow b 2) (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (pow b 2) (- (+ (* -1 (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)) (* -1 r)))) (* b (- (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r))) (* -1/2 r))))) (* (pow b 2) (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (+ (* a (* b (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r))))))) (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (+ (* a (+ (* a (- (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r))) (* -1/2 r))) (* b (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (+ (* a (+ (* a (- (+ (* a (* b (- (+ (* -1 (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)) (* -1 r)))) (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r)))) (* -1/2 r))) (* b (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* b (- (* -1/6 r) (* -1/2 r)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* a (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))) (* b (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* a (+ r (+ (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (* b (- (+ r (* -1/12 r)) (* -1/4 r))))))) (* b (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* a (+ r (+ (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (+ (* a (- (+ (* -1 (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)) (* -1 r))) (* b (- (+ r (* -1/12 r)) (* -1/4 r)))))))) (* b (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (* -1/6 r) (* -1/2 r))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1 (* a (* b (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r))))) (* -1/6 r)) (* -1/2 r))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1/6 r) (* a (+ (* -1 (* b (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (- (+ r (* -1/12 r)) (* -1/4 r)))))) (* -1/2 r))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1/6 r) (* a (+ (* -1 (* b (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (- (+ r (+ (* -1 (* a (* b (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/12 r))) (* -1/4 r)))))) (* -1/2 r))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (+ (* -1/3 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/6 r)))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (+ (* -1/3 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* -1/3 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/6 r)))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (+ (* -1/3 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* -1/3 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/2 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* -1/2 (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (+ (* -1/3 (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r))))))) (+ (* -1/720 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/24 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))))))) (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))))))))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/6 r)))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a r)))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (pow (cos a) 2) #s(hole binary64 1))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* -1/2 r) (* -1/6 r)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/2 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* -1/2 (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (+ (* -1/720 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/24 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r)))))) (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))))))))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (* -1/6 r) (* -1/2 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r))))) (* -1/2 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r))))) (* -1/2 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/6 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* -1/2 (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (+ (* -1/720 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/24 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r)))))))))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r))))) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (* -1/6 r) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (* -1/4 r)))) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))) (* -1/4 r)))) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/6 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))))))))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))) (* -1/4 r)))) (* -1/2 r)))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (* -1/6 r) (* -1/2 r))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (* -1/12 r)) (* -1/4 r)))) (* -1/2 r))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (* -1/4 r)))) (* -1/2 r))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* 1/6 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))))))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (* -1/4 r)))) (* -1/2 r))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (* -1/6 r)))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (+ (* -1/6 r) (* -1/12 (* (pow a 2) r)))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (+ (* -1/6 r) (* (pow a 2) (+ (* -1/12 r) (* 1/6 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))))))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (+ (* -1/6 r) (* (pow a 2) (+ (* -1/12 r) (* (pow a 2) (+ (* 1/6 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (* 1/6 (+ (* -1/4 r) (* 1/24 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 (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (* -1/2 r)))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (+ (* -1/2 r) (* (pow a 2) (- (* -1/4 r) r)))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))) (* -1/3 r)))) r)))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* 1/2 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))) (* 2/45 r))))) (* -1/3 r)))) r)))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* -1 (* (pow a 2) r))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* -3/2 r) (* -1/3 r))) r))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* -3/2 r) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r)) (* 2/45 r)))) (* -1/3 r))) r))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* -3/2 r) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 7/8 r) (* (pow a 2) (- (+ (* -3/2 (- (* 2/45 r) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/3 r) (* -3/2 r))))) (* -1/315 r))))) (* 2/45 r)))) (* -1/3 r))) r))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) r)))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (- (* -1/3 r) (* -3/2 r)))))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (- (+ (* -1/3 r) (* (pow a 2) (- (* 2/45 r) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (- (+ (* -1/3 r) (* (pow a 2) (- (+ (* 2/45 r) (* (pow a 2) (- (* -1/315 r) (+ (* -3/2 (- (* 2/45 r) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/3 r) (* -3/2 r)))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) r)))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) (+ r (* -1/3 (* (pow a 2) r))))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (+ (* -1/3 r) (* 2/45 (* (pow a 2) r))))))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (+ (* -1/3 r) (* (pow a 2) (+ (* -1/315 (* (pow a 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* -1/3 (pow a 2))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* 2/45 (pow a 2)) 1/3))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/45 (* -1/315 (pow a 2)))) 1/3))))))
#s(approx (pow (cos a) 3) #s(hole binary64 1))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a r)))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (+ (* 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (- (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#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 (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (* b (+ 1/2 (* 7/6 (pow b 2))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (pow b 2) (+ 5/6 (* 14/9 (pow b 2))))) (* b (+ 1/2 (* 7/6 (pow b 2)))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (* b (+ 1 (* 2/3 (pow b 2)))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (* 7/6 (pow b 2)))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (+ (* 7/6 (pow b 2)) (* a (* b (+ 5/6 (* 14/9 (pow b 2)))))))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* 1/3 b)))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (* 2/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* 7/6 (* a b))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* a (+ (* 7/6 b) (* a (+ 5/6 (* 14/9 (pow b 2))))))))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 1/3))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (+ 1/3 (* 2/3 (* a b)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* 7/6 a))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* a (+ 7/6 (* 14/9 (* a b)))))))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* -2/3 a)))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (* -14/9 (pow a 2)) 2/3))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (* (pow a 2) (- (* -331/180 (pow a 2)) 14/9)) 2/3))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (* (pow a 2) (- (* (pow a 2) (- (* -3071/1890 (pow a 2)) 331/180)) 14/9)) 2/3))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 a))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* -1/3 a)))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* -23/18 (pow a 2)) 1/3))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* (pow a 2) (- (* -601/360 (pow a 2)) 23/18)) 1/3))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* (pow a 2) (- (* (pow a 2) (- (* -23183/15120 (pow a 2)) 601/360)) 23/18)) 1/3))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* 1/3 a)))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* 23/18 (pow a 2))))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* 601/360 (pow a 2))))))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* (pow a 2) (+ 601/360 (* 23183/15120 (pow a 2))))))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* 1/3 a)))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* 10/9 (pow a 2))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* 47/45 (pow a 2))))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* (pow a 2) (+ 47/45 (* 142/189 (pow a 2))))))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 1/3))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (+ 1/3 (* 7/6 (pow a 2)))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* 89/72 (pow a 2)))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 89/72 (* 2047/2160 (pow a 2)))))))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 1/2))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (+ 1/2 (* 1/4 (pow a 2)))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (+ 1/2 (* (pow a 2) (+ 1/4 (* 5/48 (pow a 2)))))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (+ 1/2 (* (pow a 2) (+ 1/4 (* (pow a 2) (+ 5/48 (* 61/1440 (pow a 2)))))))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 1/6))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ 1/6 (* -11/12 (pow a 2)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* -163/144 (pow a 2)) 11/12)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* (pow a 2) (- (* -3911/4320 (pow a 2)) 163/144)) 11/12)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (pow a 2)))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* 7/6 (pow a 2))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* 331/360 (pow a 2))))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 331/360 (* 3071/5040 (pow a 2))))))))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 1/6))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (+ 1/6 (* 1/12 (pow a 2)))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* 5/144 (pow a 2)))))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* (pow a 2) (+ 5/144 (* 61/4320 (pow a 2)))))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 a))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (pow (cos a) -1) #s(hole binary64 1))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#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 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* -1 (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (- (* -1/2 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow (sin a) 2)))
#s(approx (pow (cos a) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* -1 (* (pow a 2) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* a (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (/ 1/2 (cos a))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (/ (pow (sin a) 2) (pow (cos a) 3))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (/ 1/6 (cos a))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (pow (cos a) -1) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (+ (* -1 (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))) a))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#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 b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin 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)) (* (sin b) (sin 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 b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ (* b (+ (* b (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (* 1/2 (* (pow a 2) r))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* a (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (* (pow a 2) (- r (* -1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (+ (* a (* b (+ (* -1 (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* 2/3 r)))) (* (pow a 2) (- r (* -1/6 r)))))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* 1/2 (* a (* b r)))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))) (* a (* b (- r (* -1/6 r)))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))) (* b (+ (* a (- r (* -1/6 r))) (* b (+ (* -1 (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* 2/3 r))))))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* 1/2 (* b r))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* b (- (* -1 (* a (* b (+ (* -1 r) (* 1/6 r))))) (* -1/2 r)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* b (- r (* -1/6 r))))) (* -1/2 r)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* b (- (+ r (* -1 (* a (* b (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))))) (* -1/6 r))))) (* -1/2 r)))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* -1 (* a (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r)))))) (* -1 (* a (+ (* -1 r) (* 1/6 r))))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (* -1 (* a (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r)))))))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* (pow b 2) (+ (* -1 (* a (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -31/315 r) (+ (* -17/630 r) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/6 r) r)) (* 31/945 r)))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r)))))))) (* -1 (* a (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (+ (* 17/270 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -31/315 r) (+ (* -17/630 r) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/6 r) r)) (* 31/945 r)))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r))))))))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* 1/6 r)))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r)))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (+ (* 17/270 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -17/630 r) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/6 r) r)) (* 31/945 r))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r)))))))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r))))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -17/630 r) (+ (* 1/10080 r) (* 1/120 (- (* -1/6 r) r))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r))))))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* 1/12 r)) r))))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) r)))) r))))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -17/630 r) (+ (* 1/10080 r) (* 1/120 (- (* -1/6 r) r))))) (* 11/15 r)))))) r)))) r))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (* -1/6 r) r))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (* -1/15 r) r))) r))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (+ (* -1/15 r) (* (pow b 2) (- (* -17/630 r) (* 11/15 r)))) r))) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* (pow b 3) (- (* -1 (* (pow b 2) r)) r))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* (pow b 3) (- (* (pow b 2) (- (* -11/15 (* (pow b 2) r)) r)) r))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* (pow b 3) (- (* (pow b 2) (- (* (pow b 2) (- (* -88/189 (* (pow b 2) r)) (* 11/15 r))) r)) r))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) r)))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ r (* 11/15 (* (pow b 2) r))))))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ r (* (pow b 2) (+ (* 88/189 (* (pow b 2) r)) (* 11/15 r)))))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (pow b 2)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* 11/15 (pow b 2))))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* (pow b 2) (+ 11/15 (* 88/189 (pow b 2))))))))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#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 (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) 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)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#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 a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* -1 (* (pow b 4) (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3)))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ r (* (pow b 3) (cos a))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3)))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ r (* (pow b 3) (cos a))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* (pow b 2) (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3)))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* b (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (/ (pow (sin b) 3) (pow (cos b) 3))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* -1 (* (pow b 4) (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (/ 1/3 (* b (cos a)))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (+ (/ 1 (* (pow b 3) (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2)))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (/ 1/3 (* b (cos a)))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (+ (/ 1 (* (pow b 3) (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2)))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* (pow b 2) (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (* b (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (* -1 (/ (+ (* -1 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (* -1 (/ (* r (sin a)) (* b (pow (cos a) 2))))) b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (* -1 (/ (+ (* -1 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (* -1 (/ (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) b))) b))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1/6 (/ r (cos a))) (+ (/ (* r (sin a)) (* b (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2)))) b)) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (* -1 (/ (+ (* -1 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (* -1 (/ (* r (sin a)) (* b (pow (cos a) 2))))) b))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (* b (pow (cos a) 2))))) b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))) b))) b))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (cos a))) (/ (sin a) (* b (pow (cos a) 2)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a)))) b)) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (* b (pow (cos a) 2))))) b))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))

Calls

9 calls:

Time	Variable		Point	Expression
65.0ms	a	@	inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 -1/3 (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (* -1/6 (/ r (cos a))) -1/6 (/ r (cos a)) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) -1/2 (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (* (pow (sin a) 2) r) (pow (sin a) 2) (pow (cos a) 3) 3 (* 1 (/ (* (sin a) r) (pow (cos a) 2))) 1 (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (pow (tan b) 2)) (pow (tan b) 2) (tan b) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) 1/6 (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (* r (tan b)) (neg (* r (pow (tan b) 3))) (* r (pow (tan b) 3)) (pow (tan b) 3) (* 1 (* r (pow (tan b) 2))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (/ (sin a) (pow (cos a) 2)) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (/ 1/2 (cos a)) 1/2 (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)) -1 (/ 1/6 (cos a)) (* 1 (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
34.0ms	a	@	-inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 -1/3 (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (* -1/6 (/ r (cos a))) -1/6 (/ r (cos a)) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) -1/2 (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (* (pow (sin a) 2) r) (pow (sin a) 2) (pow (cos a) 3) 3 (* 1 (/ (* (sin a) r) (pow (cos a) 2))) 1 (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (pow (tan b) 2)) (pow (tan b) 2) (tan b) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) 1/6 (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (* r (tan b)) (neg (* r (pow (tan b) 3))) (* r (pow (tan b) 3)) (pow (tan b) 3) (* 1 (* r (pow (tan b) 2))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (/ (sin a) (pow (cos a) 2)) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (/ 1/2 (cos a)) 1/2 (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)) -1 (/ 1/6 (cos a)) (* 1 (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
33.0ms	a	@	0	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 -1/3 (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (* -1/6 (/ r (cos a))) -1/6 (/ r (cos a)) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) -1/2 (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (* (pow (sin a) 2) r) (pow (sin a) 2) (pow (cos a) 3) 3 (* 1 (/ (* (sin a) r) (pow (cos a) 2))) 1 (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (pow (tan b) 2)) (pow (tan b) 2) (tan b) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) 1/6 (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (* r (tan b)) (neg (* r (pow (tan b) 3))) (* r (pow (tan b) 3)) (pow (tan b) 3) (* 1 (* r (pow (tan b) 2))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (/ (sin a) (pow (cos a) 2)) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (/ 1/2 (cos a)) 1/2 (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)) -1 (/ 1/6 (cos a)) (* 1 (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
29.0ms	b	@	-inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 -1/3 (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (* -1/6 (/ r (cos a))) -1/6 (/ r (cos a)) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) -1/2 (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (* (pow (sin a) 2) r) (pow (sin a) 2) (pow (cos a) 3) 3 (* 1 (/ (* (sin a) r) (pow (cos a) 2))) 1 (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (pow (tan b) 2)) (pow (tan b) 2) (tan b) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) 1/6 (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (* r (tan b)) (neg (* r (pow (tan b) 3))) (* r (pow (tan b) 3)) (pow (tan b) 3) (* 1 (* r (pow (tan b) 2))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (/ (sin a) (pow (cos a) 2)) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (/ 1/2 (cos a)) 1/2 (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)) -1 (/ 1/6 (cos a)) (* 1 (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
28.0ms	r	@	inf	((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (pow (cos a) 2) 2 -1/3 (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (* -1/6 (/ r (cos a))) -1/6 (/ r (cos a)) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) -1/2 (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (* (pow (sin a) 2) r) (pow (sin a) 2) (pow (cos a) 3) 3 (* 1 (/ (* (sin a) r) (pow (cos a) 2))) 1 (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (pow (tan b) 2)) (pow (tan b) 2) (tan b) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) 1/6 (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (* r (tan b)) (neg (* r (pow (tan b) 3))) (* r (pow (tan b) 3)) (pow (tan b) 3) (* 1 (* r (pow (tan b) 2))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (/ (sin a) (pow (cos a) 2)) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (/ 1/2 (cos a)) 1/2 (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)) -1 (/ 1/6 (cos a)) (* 1 (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))

rewrite310.0ms (0.5%)

Memory

8.3MiB live, 385.5MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3038	41583
0	3260	40664
0	9402	39470

Stop Event

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

Counts

670 → 762

Calls

Call 1

Inputs
(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
r
(/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a))))
(sin.f64 b)
b
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
(.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b)
(fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a)))
(fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))))
(neg.f64 b)
(fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))
(/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 (sin.f64 a) r)
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal -1/3 binary64)
(neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))
(.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a))
(-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))
(*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))
#s(literal -1/6 binary64)
(/.f64 r (cos.f64 a))
(fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
#s(literal -1/2 binary64)
(neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
(/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r)
(pow.f64 (sin.f64 a) #s(literal 2 binary64))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
#s(literal 3 binary64)
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(literal 1 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
(fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b)))
(fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
(-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
(.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)))))
(neg.f64 a)
(fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))
(*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(pow.f64 (tan.f64 b) #s(literal 2 binary64))
(tan.f64 b)
(fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)))
#s(literal 1/6 binary64)
(/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b))
(fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
(*.f64 r (tan.f64 b))
(neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
(*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))
(pow.f64 (tan.f64 b) #s(literal 3 binary64))
(.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))
(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))))
(fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))
(/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))
(/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))
(*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a))
(-.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))))
(/.f64 #s(literal 1/2 binary64) (cos.f64 a))
#s(literal 1/2 binary64)
(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)))
(/.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))
(*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(pow.f64 (cos.f64 a) #s(literal -1 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))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (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)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* r (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* r (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* r (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))) (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* r (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (cos a))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* -1 (/ (* r (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (/ (* r (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* r (* (sin a) (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (* r (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (* -1/6 (/ r (cos a)))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3)))))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* r (pow (sin a) 2))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* r (+ (* 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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* r (+ (* 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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* r (- (+ (* -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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* -1 (* a (* r (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* r (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* r (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (/ (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* r (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* b (+ (* -1 (/ (sin a) (pow (cos a) 2))) (* b (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))) (/ 1 (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* b (+ (* -1 (/ (sin a) (pow (cos a) 2))) (* b (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))) (/ 1 (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin a) (pow (cos a) 2))) (* b (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (* b (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (* 1/2 (/ 1 (cos a))))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* -1 (* r (- (* 1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))) (cos a)))))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (/ (* r (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a)))))) (cos a))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* -1 (/ (* r (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a)))))) (cos a)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* -1 (* r (* (sin a) (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a)))))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))) (* 1/2 (/ 1 (cos a))))))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (* -1 (* r (- (* 1/2 (/ 1 (cos a))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* a (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* -1 (/ (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))) (cos b)))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* -1 (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* -1 (* r (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin 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)) (* (sin b) (sin 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)) (* (sin b) (sin 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 (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r))))))) (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (* b (- (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r))) (* -1/2 r)))) (* (pow b 2) (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (pow b 2) (- (+ (* -1 (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)) (* -1 r)))) (* b (- (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r))) (* -1/2 r))))) (* (pow b 2) (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (+ (* a (* b (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r))))))) (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (+ (* a (+ (* a (- (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r))) (* -1/2 r))) (* b (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ r (+ (* a (+ (* a (- (+ (* a (* b (- (+ (* -1 (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)) (* -1 r)))) (* (pow b 2) (- (+ r (* -1/12 r)) (* -1/4 r)))) (* -1/2 r))) (* b (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))))) (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* b (- (* -1/6 r) (* -1/2 r)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* a (+ r (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))) (* b (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* a (+ r (+ (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (* b (- (+ r (* -1/12 r)) (* -1/4 r))))))) (* b (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* a (+ r (+ (* -1 (* (pow b 2) (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (+ (* a (- (+ (* -1 (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)) (* -1 r))) (* b (- (+ r (* -1/12 r)) (* -1/4 r)))))))) (* b (- (* -1/6 r) (* -1/2 r))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (* -1/6 r) (* -1/2 r))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1 (* a (* b (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r))))) (* -1/6 r)) (* -1/2 r))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1/6 r) (* a (+ (* -1 (* b (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (- (+ r (* -1/12 r)) (* -1/4 r)))))) (* -1/2 r))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1/6 r) (* a (+ (* -1 (* b (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))) (* a (- (+ r (+ (* -1 (* a (* b (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/12 r))) (* -1/4 r)))))) (* -1/2 r))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* -1/3 r)) (* -1/6 r)))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (+ (* -1/3 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (* -1/4 r))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/6 r)))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (+ (* -1/3 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* -1/3 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/6 r)))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (+ (* -1/2 r) (+ (* -1/3 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/3 (- (* -1/6 r) (* -1 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* -1/3 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/2 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* -1/2 (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (+ (* -1/3 (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r))))))) (+ (* -1/720 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/24 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))))))) (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))))))))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))))))) (* -1/6 r)))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a r)))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (pow (cos a) 2) #s(hole binary64 1))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* -1/2 r) (* -1/6 r)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* a (- (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/2 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* -1/2 (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (+ (* -1/720 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/24 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r)))))) (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))))))))))) (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r)))))) (* -1/6 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (* -1/6 r) (* -1/2 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r))))) (* -1/2 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r))))) (* -1/2 r)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/6 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* -1/2 (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (+ (* -1/720 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/24 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r)))))))))))) (+ (* -3/2 r) (+ (* -1/2 (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r)))) (+ (* 1/24 (- (* -1/6 r) (* -1/2 r))) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* -1/4 r))))) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (* -1/6 r) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (* -1/12 r))) (* -1/4 r)))) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))) (* -1/4 r)))) (* -1/2 r)))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* a (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/6 (- (* -1/6 r) (* -1/2 r))) (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 1/120 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/6 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -1/6 (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (+ (* -1/5040 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/120 (- (+ r (* -1/12 r)) (* -1/4 r))) (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))))))))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))))) (* -1/4 r)))) (* -1/2 r)))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (* -1/6 r) (* -1/2 r))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (* -1/12 r)) (* -1/4 r)))) (* -1/2 r))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (* 1/6 (+ (* -1/4 r) (* 1/24 r)))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (* -1/4 r)))) (* -1/2 r))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 r) (* (pow a 2) (- (+ r (+ (* -1/12 r) (* (pow a 2) (- (+ (* -1/3 r) (+ (* 1/6 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* 2/45 r) (* 1/6 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))))))) (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))))) (* -1/4 r)))) (* -1/2 r))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (* -1/6 r)))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (+ (* -1/6 r) (* -1/12 (* (pow a 2) r)))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (+ (* -1/6 r) (* (pow a 2) (+ (* -1/12 r) (* 1/6 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))))))))
#s(approx (* -1/6 (/ r (cos a))) #s(hole binary64 (+ (* -1/6 r) (* (pow a 2) (+ (* -1/12 r) (* (pow a 2) (+ (* 1/6 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (* 1/6 (+ (* -1/4 r) (* 1/24 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 (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (* -1/2 r)))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (+ (* -1/2 r) (* (pow a 2) (- (* -1/4 r) r)))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))) (* -1/3 r)))) r)))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (+ (* -1/2 r) (* (pow a 2) (- (+ (* -1/4 r) (* (pow a 2) (- (+ (* -3/2 r) (+ (* 1/2 (+ (* -1/4 r) (* 1/24 r))) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 1/2 (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r)))))) (* 7/8 r))) (* 2/45 r))))) (* -1/3 r)))) r)))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* -1 (* (pow a 2) r))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* -3/2 r) (* -1/3 r))) r))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* -3/2 r) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r)) (* 2/45 r)))) (* -1/3 r))) r))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* -3/2 r) (* (pow a 2) (- (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (+ (* 7/8 r) (* (pow a 2) (- (+ (* -3/2 (- (* 2/45 r) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/3 r) (* -3/2 r))))) (* -1/315 r))))) (* 2/45 r)))) (* -1/3 r))) r))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) r)))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (- (* -1/3 r) (* -3/2 r)))))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (- (+ (* -1/3 r) (* (pow a 2) (- (* 2/45 r) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (- (+ (* -1/3 r) (* (pow a 2) (- (+ (* 2/45 r) (* (pow a 2) (- (* -1/315 r) (+ (* -3/2 (- (* 2/45 r) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/3 r) (* -3/2 r)))))))) (+ (* -3/2 (- (* -1/3 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) r)))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) (+ r (* -1/3 (* (pow a 2) r))))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (+ (* -1/3 r) (* 2/45 (* (pow a 2) r))))))))
#s(approx (* (pow (sin a) 2) r) #s(hole binary64 (* (pow a 2) (+ r (* (pow a 2) (+ (* -1/3 r) (* (pow a 2) (+ (* -1/315 (* (pow a 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* -1/3 (pow a 2))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* 2/45 (pow a 2)) 1/3))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/45 (* -1/315 (pow a 2)))) 1/3))))))
#s(approx (pow (cos a) 3) #s(hole binary64 1))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a r)))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (+ (* 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (- (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#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 (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (* b (+ 1/2 (* 7/6 (pow b 2))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (pow b 2) (+ 5/6 (* 14/9 (pow b 2))))) (* b (+ 1/2 (* 7/6 (pow b 2)))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (* b (+ 1 (* 2/3 (pow b 2)))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (* 7/6 (pow b 2)))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (+ (* 7/6 (pow b 2)) (* a (* b (+ 5/6 (* 14/9 (pow b 2)))))))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* 1/3 b)))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (* 2/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* 7/6 (* a b))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* a (+ (* 7/6 b) (* a (+ 5/6 (* 14/9 (pow b 2))))))))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 1/3))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (+ 1/3 (* 2/3 (* a b)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* 7/6 a))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* a (+ 7/6 (* 14/9 (* a b)))))))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* -2/3 a)))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (* -14/9 (pow a 2)) 2/3))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (* (pow a 2) (- (* -331/180 (pow a 2)) 14/9)) 2/3))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (* a (- (* (pow a 2) (- (* (pow a 2) (- (* -3071/1890 (pow a 2)) 331/180)) 14/9)) 2/3))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 a))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* -1/3 a)))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* -23/18 (pow a 2)) 1/3))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* (pow a 2) (- (* -601/360 (pow a 2)) 23/18)) 1/3))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* a (- (* (pow a 2) (- (* (pow a 2) (- (* -23183/15120 (pow a 2)) 601/360)) 23/18)) 1/3))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* 1/3 a)))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* 23/18 (pow a 2))))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* 601/360 (pow a 2))))))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* (pow a 2) (+ 601/360 (* 23183/15120 (pow a 2))))))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* 1/3 a)))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* 10/9 (pow a 2))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* 47/45 (pow a 2))))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* (pow a 2) (+ 47/45 (* 142/189 (pow a 2))))))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 1/3))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (+ 1/3 (* 7/6 (pow a 2)))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* 89/72 (pow a 2)))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 89/72 (* 2047/2160 (pow a 2)))))))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 1/2))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (+ 1/2 (* 1/4 (pow a 2)))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (+ 1/2 (* (pow a 2) (+ 1/4 (* 5/48 (pow a 2)))))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (+ 1/2 (* (pow a 2) (+ 1/4 (* (pow a 2) (+ 5/48 (* 61/1440 (pow a 2)))))))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 1/6))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ 1/6 (* -11/12 (pow a 2)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* -163/144 (pow a 2)) 11/12)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* (pow a 2) (- (* -3911/4320 (pow a 2)) 163/144)) 11/12)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (pow a 2)))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* 7/6 (pow a 2))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* 331/360 (pow a 2))))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 331/360 (* 3071/5040 (pow a 2))))))))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 1/6))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (+ 1/6 (* 1/12 (pow a 2)))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* 5/144 (pow a 2)))))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* (pow a 2) (+ 5/144 (* 61/4320 (pow a 2)))))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 a))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (pow (cos a) -1) #s(hole binary64 1))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#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 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) #s(hole binary64 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) #s(hole binary64 (* -1 (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) #s(hole binary64 (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) #s(hole binary64 (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) #s(hole binary64 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) #s(hole binary64 (- (* -1/2 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow (sin a) 2)))
#s(approx (pow (cos a) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* -1 (* (pow a 2) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* a (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (- (+ (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) #s(hole binary64 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) #s(hole binary64 (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) #s(hole binary64 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) #s(hole binary64 (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(hole binary64 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (/ 1/2 (cos a)) #s(hole binary64 (/ 1/2 (cos a))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(hole binary64 (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (/ (pow (sin a) 2) (pow (cos a) 3))))
#s(approx (/ 1/6 (cos a)) #s(hole binary64 (/ 1/6 (cos a))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (pow (cos a) -1) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (+ (* -1 (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))) a))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#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 b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin 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)) (* (sin b) (sin 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 b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (+ (* b (+ (* b (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (* 1/2 (* (pow a 2) r))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* a (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (* (pow a 2) (- r (* -1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (+ (* a (* b (+ (* -1 (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* 2/3 r)))) (* (pow a 2) (- r (* -1/6 r)))))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* 1/2 (* a (* b r)))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))) (* a (* b (- r (* -1/6 r)))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))) (* b (+ (* a (- r (* -1/6 r))) (* b (+ (* -1 (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* 2/3 r))))))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* 1/2 (* b r))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* b (- (* -1 (* a (* b (+ (* -1 r) (* 1/6 r))))) (* -1/2 r)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* b (- r (* -1/6 r))))) (* -1/2 r)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* b (- (+ r (* -1 (* a (* b (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))))) (* -1/6 r))))) (* -1/2 r)))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* -1 (* a (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r)))))) (* -1 (* a (+ (* -1 r) (* 1/6 r))))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (* -1 (* a (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r)))))))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* (pow b 2) (+ (* -1 (* a (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -31/315 r) (+ (* -17/630 r) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/6 r) r)) (* 31/945 r)))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r)))))))) (* -1 (* a (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -17/90 r) (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (+ (* 17/270 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -31/315 r) (+ (* -17/630 r) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/6 r) r)) (* 31/945 r)))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r))))))))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* r (pow (tan b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* 1/6 r)))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* 17/270 r)))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (+ (* 1/9 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (+ (* 17/270 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -17/630 r) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/6 r) r)) (* 31/945 r))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r)))))))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r))))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -17/630 r) (+ (* 1/10080 r) (* 1/120 (- (* -1/6 r) r))))) (+ (* -1/2 (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* 11/15 r))))))))) (+ r (+ (* -1/2 (- (+ (* -1/6 r) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* 1/12 r)) r))))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (* -1/240 r))) r)))) r))))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/6 r) r)) (+ (* -1/15 r) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -1/6 (- (* -1/15 r) r)) (+ (* -17/630 r) (+ (* 1/10080 r) (* 1/120 (- (* -1/6 r) r))))) (* 11/15 r)))))) r)))) r))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (* -1/6 r) r))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (* -1/15 r) r))) r))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (+ (* -1/15 r) (* (pow b 2) (- (* -17/630 r) (* 11/15 r)))) r))) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* (pow b 3) (- (* -1 (* (pow b 2) r)) r))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* (pow b 3) (- (* (pow b 2) (- (* -11/15 (* (pow b 2) r)) r)) r))))
#s(approx (neg (* r (pow (tan b) 3))) #s(hole binary64 (* (pow b 3) (- (* (pow b 2) (- (* (pow b 2) (- (* -88/189 (* (pow b 2) r)) (* 11/15 r))) r)) r))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) r)))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ r (* 11/15 (* (pow b 2) r))))))))
#s(approx (* r (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ r (* (pow b 2) (+ (* 88/189 (* (pow b 2) r)) (* 11/15 r)))))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (pow b 2)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* 11/15 (pow b 2))))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* (pow b 2) (+ 11/15 (* 88/189 (pow b 2))))))))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* 1 (* r (pow (tan b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#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 (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) 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)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#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 a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* -1 (* (pow b 4) (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3)))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ r (* (pow b 3) (cos a))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3)))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ r (* (pow b 3) (cos a))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* (pow b 2) (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (+ (/ (* r (sin a)) (* (pow b 2) (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3)))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* -1 (* b (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* b (- (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (+ (* -1/6 (/ r (* b (cos a)))) (/ (* r (pow (sin a) 2)) (* b (pow (cos a) 3))))) (* -1/2 (/ r (* b (cos a))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) #s(hole binary64 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) #s(hole binary64 (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) #s(hole binary64 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) #s(hole binary64 (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) #s(hole binary64 (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (/ (pow (sin b) 3) (pow (cos b) 3))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* -1 (* (pow b 4) (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (/ 1/3 (* b (cos a)))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (+ (/ 1 (* (pow b 3) (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2)))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (/ 1/3 (* b (cos a)))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (+ (/ 1/3 (* b (cos a))) (+ (/ 1 (* (pow b 3) (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2)))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* (pow b 2) (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (* -1 (* b (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (* b (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (* -1 (/ (+ (* -1 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (* -1 (/ (* r (sin a)) (* b (pow (cos a) 2))))) b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (* -1 (/ (+ (* -1 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (* -1 (/ (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) b))) b))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1/6 (/ r (cos a))) (+ (/ (* r (sin a)) (* b (pow (cos a) 2))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2)))) b)) (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3)))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (- (* -1/3 (/ (* r (sin a)) (pow (cos a) 2))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))) (* -1 (/ (+ (* -1 (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (* -1 (/ (* r (sin a)) (* b (pow (cos a) 2))))) b))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))) b)) (* -1/3 (/ (* r (sin a)) (pow (cos a) 2)))) (/ (* (sin a) (- (+ (* -1/6 (/ r (cos a))) (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a))))) (cos a)))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (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 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (* b (pow (cos a) 2))))) b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 4) (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))) b))) b))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (cos a))) (/ (sin a) (* b (pow (cos a) 2)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a)))) b)) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (- (* -1/3 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (* b (pow (cos a) 2))))) b))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a)))))))

Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 b a))))
r
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 b a))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 b a)))
(sin.f64 b)
b
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 b) (sin.f64 a)))
(cos.f64 (+.f64 b a))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 b a)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))
(sin.f64 a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
(.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b)
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) #s(literal 3 binary64)) (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (-.f64 (.f64 (/.f64 r (cos.f64 a)) (/.f64 r (cos.f64 a))) (.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (/.f64 r (cos.f64 a))))))
(fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a)))
(+.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (/.f64 r (cos.f64 a)))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
(fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(+.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b) (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))) (.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))) (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) (.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))))
(fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))))
(+.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))))
(neg.f64 b)
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (-.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (.f64 (.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))))))
(fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))
(+.f64 (.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))))
(/.f64 (neg.f64 (*.f64 (sin.f64 a) r)) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 (sin.f64 a) r)
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
#s(literal 2 binary64)
#s(literal -1/3 binary64)
(neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a))) (neg.f64 (cos.f64 a)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a))
(.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a))
(-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))
(*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))
#s(literal -1/6 binary64)
(/.f64 (neg.f64 r) (neg.f64 (cos.f64 a)))
(/.f64 r (cos.f64 a))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64)) (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64)) (-.f64 (.f64 (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
(fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
(+.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
#s(literal -1/2 binary64)
(neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r)) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
(/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r)
(*.f64 (sin.f64 a) (sin.f64 a))
(pow.f64 (sin.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (cos.f64 a))
(*.f64 (cos.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 3 binary64)))
#s(literal 3 binary64)
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(literal 1 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a) #s(literal 3 binary64)) (pow.f64 (.f64 r (tan.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a) (.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a) (-.f64 (.f64 (.f64 r (tan.f64 b)) (.f64 r (tan.f64 b))) (.f64 (.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a) (.f64 r (tan.f64 b))))))
(fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b)))
(+.f64 (.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a) (.f64 r (tan.f64 b)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) (.f64 (.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))))))
(fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
(+.f64 (.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a) (.f64 #s(literal 1 binary64) (*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
(-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
(.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)))))
(neg.f64 a)
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)))) (.f64 (.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)))))))
(fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))
(+.f64 (.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))
(*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(*.f64 (tan.f64 b) (tan.f64 b))
(pow.f64 (tan.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (tan.f64 b)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) (-.f64 (.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))) (.f64 (.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))))
(fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)))
(+.f64 (.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b)))
#s(literal 1/6 binary64)
(/.f64 (neg.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b))) (neg.f64 (cos.f64 b)))
(/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b))) (.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b))) (-.f64 (.f64 (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b))) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b))) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
(*.f64 r (tan.f64 b))
(neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
(*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))
(*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))
(*.f64 (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(pow.f64 (tan.f64 b) #s(literal 3 binary64))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (tan.f64 b)) #s(literal 3 binary64)))
(.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))
(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(+.f64 (.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b) (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b) (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
(fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(+.f64 (.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b) (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))) #s(literal 3 binary64)) (pow.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)))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))) (.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))) (-.f64 (.f64 (-.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)))) (-.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))))) (.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))))))
(fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))))
(+.f64 (.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (-.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (.f64 (.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))))))
(fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))
(+.f64 (.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))))
(/.f64 (neg.f64 (sin.f64 a)) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a))) (neg.f64 (cos.f64 a)))
(/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a))
(*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a))
(-.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))))
(/.f64 #s(literal 1/2 binary64) (cos.f64 a))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 a)))
#s(literal 1/2 binary64)
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 a)) #s(literal 3 binary64))) (fma.f64 (.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 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 a)) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (.f64 (.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))))))
(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)))
(+.f64 (*.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)))
(/.f64 (neg.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
(/.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))
(/.f64 #s(literal -1/6 binary64) (neg.f64 (cos.f64 a)))
(*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal -1 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 (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 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a 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)))
(.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64)))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
(*.f64 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a 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 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx r r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 b (.f64 r (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 r (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (.f64 r (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (.f64 r (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (sin a) r) (*.f64 r (sin.f64 a)))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (/.f64 (.f64 r (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (.f64 r (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (.f64 r (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (* -1/6 (/ r (cos a))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))))
#s(approx (/ r (cos a)) (/.f64 r (cos.f64 a)))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (pow (sin a) 2) r) (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 r (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b))))) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 r (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b))))) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b))))) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b))))))
#s(approx (* r (pow (tan b) 2)) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) (.f64 r (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b)))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (/.f64 (.f64 r (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (.f64 r (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (.f64 r (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
#s(approx (* r (tan b)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (neg (* r (pow (tan b) 3))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
#s(approx (* r (pow (tan b) 3)) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* 1 (* r (pow (tan b) 2))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 #s(literal -1 binary64) (.f64 b (.f64 r (-.f64 (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (cos.f64 a))))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (/.f64 (.f64 r (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (.f64 #s(literal -1 binary64) (.f64 r (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (tan.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (tan.f64 b))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (tan.f64 b))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (tan.f64 b))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (.f64 a (.f64 r (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (cos.f64 b))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (.f64 #s(literal -1 binary64) (.f64 r (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/6 binary64) (.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 a a))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 a a)) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 a a)))) #s(literal 1/2 binary64)))))
#s(approx a a)
#s(approx (* (sin b) (sin a)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin b) (sin a)) (.f64 a (+.f64 (sin.f64 b) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) (sin.f64 b))))))
#s(approx (* (sin b) (sin a)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin b) (sin a)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 a a) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (sin a) a)
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 a a)))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 a a)))) #s(literal 1/6 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 b (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (fma.f64 a (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r)))))) (.f64 b (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (fma.f64 a (fma.f64 a (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (.f64 #s(literal -1/2 binary64) r))) (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))))))) (.f64 b (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (fma.f64 a (fma.f64 a (fma.f64 a (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))))) (.f64 #s(literal -1/6 binary64) r)) (.f64 #s(literal -1 binary64) r))) (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (.f64 #s(literal -1/2 binary64) r)))) (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))))))) (.f64 b (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+.f64 r (fma.f64 a (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r)))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+.f64 r (fma.f64 a (fma.f64 a (-.f64 (.f64 (.f64 b b) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (.f64 #s(literal -1/2 binary64) r)) (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+.f64 r (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))))) (.f64 #s(literal -1/6 binary64) r)) (.f64 #s(literal -1 binary64) r))) (.f64 (.f64 b b) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)))) (.f64 #s(literal -1/2 binary64) r)) (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (fma.f64 a (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))))) (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (fma.f64 a (+.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))) (.f64 a (.f64 b (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)))))) (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (fma.f64 a (+.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))) (.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))))) (.f64 #s(literal -1/6 binary64) r)) (.f64 #s(literal -1 binary64) r)) (.f64 b (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r))))))) (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r)))) (.f64 #s(literal -1/6 binary64) r)) (.f64 #s(literal -1/2 binary64) r)))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 a (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))) (.f64 a (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)))))) (.f64 #s(literal -1/2 binary64) r)))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 a (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (.f64 #s(literal -1/6 binary64) r))) (.f64 a (-.f64 (+.f64 r (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r)))))) (.f64 #s(literal -1/12 binary64) r))) (.f64 #s(literal -1/4 binary64) r)))))) (.f64 #s(literal -1/2 binary64) r)))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/3 binary64) r)) (*.f64 #s(literal -1/6 binary64) r))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))))))) (.f64 #s(literal -1/6 binary64) r))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/4 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))))))) (*.f64 #s(literal -1/6 binary64) r))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/4 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))) (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (fma.f64 #s(literal -1/720 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/24 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal 7/8 binary64) r))))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (fma.f64 #s(literal -1/5040 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 2/45 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))))))))))) (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))))))) (.f64 #s(literal -1/6 binary64) r))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (*.f64 a r))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (.f64 a (+.f64 r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (.f64 a (+.f64 r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (.f64 a (+.f64 r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/120 binary64) r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (* (sin a) r) (*.f64 a r))
#s(approx (* (sin a) r) (.f64 a (+.f64 r (.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) r)))))
#s(approx (* (sin a) r) (.f64 a (+.f64 r (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) r)))))))
#s(approx (* (sin a) r) (.f64 a (+.f64 r (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 a a) r) (.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (pow (cos a) 2) #s(literal 1 binary64))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a a))))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 a a)) #s(literal 1 binary64)))))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 a a)))) #s(literal 1 binary64)))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -1/6 binary64) r))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r)))))) (.f64 #s(literal -1/6 binary64) r))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/4 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))) (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r)))))) (*.f64 #s(literal -1/6 binary64) r))))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/4 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))) (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/720 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/24 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal 7/8 binary64) r)))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (fma.f64 #s(literal -1/5040 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 2/45 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))))))))))) (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))))) (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r)))))) (.f64 #s(literal -1/6 binary64) r))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (.f64 a (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (.f64 a (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))))) (.f64 #s(literal -1/2 binary64) r))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (.f64 a (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/12 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))) (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (.f64 a (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/12 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (fma.f64 #s(literal -1/5040 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 2/45 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))) (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/720 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/24 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal 7/8 binary64) r)))))))))))) (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))) (fma.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/4 binary64) r))))) (.f64 #s(literal -1/2 binary64) r))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (.f64 a (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (.f64 a (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal -1/12 binary64) r))) (.f64 #s(literal -1/4 binary64) r)))) (.f64 #s(literal -1/2 binary64) r))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (.f64 a (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/12 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))) (.f64 #s(literal -1/4 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r))))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (.f64 a (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal -1/12 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (fma.f64 #s(literal -1/5040 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)) (fma.f64 #s(literal 2/45 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal 7/8 binary64) r))))))))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))) (.f64 #s(literal -1/4 binary64) r)))) (.f64 #s(literal -1/2 binary64) r))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (.f64 #s(literal -1/12 binary64) r)) (.f64 #s(literal -1/4 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/12 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))) (.f64 #s(literal -1/4 binary64) r)))) (.f64 #s(literal -1/2 binary64) r)))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (+.f64 r (fma.f64 #s(literal -1/12 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2/45 binary64) r (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal 7/8 binary64) r))))))) (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))) (.f64 #s(literal -1/4 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))
#s(approx (* -1/6 (/ r (cos a))) (*.f64 #s(literal -1/6 binary64) r))
#s(approx (* -1/6 (/ r (cos a))) (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal -1/12 binary64) (.f64 (*.f64 a a) r))))
#s(approx (* -1/6 (/ r (cos a))) (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (fma.f64 #s(literal -1/12 binary64) r (.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))))
#s(approx (* -1/6 (/ r (cos a))) (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (fma.f64 #s(literal -1/12 binary64) r (.f64 (.f64 a a) (fma.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))))))))
#s(approx (/ r (cos a)) r)
#s(approx (/ r (cos a)) (+.f64 r (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 a a) r))))
#s(approx (/ r (cos a)) (+.f64 r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (/ r (cos a)) (+.f64 r (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 a a) (-.f64 (*.f64 #s(literal -1/4 binary64) r) r))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/4 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/3 binary64) r)))) r))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/4 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r)) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal 7/8 binary64) r))) (.f64 #s(literal 2/45 binary64) r))))) (.f64 #s(literal -1/3 binary64) r)))) r))))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (.f64 #s(literal -1 binary64) (.f64 (*.f64 a a) r)))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -3/2 binary64) r) (.f64 #s(literal -1/3 binary64) r))) r)))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r)) (.f64 #s(literal 2/45 binary64) r)))) (*.f64 #s(literal -1/3 binary64) r))) r)))
#s(approx (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal 7/8 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r))) (fma.f64 #s(literal -61/240 binary64) r (.f64 #s(literal 7/8 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r))))) (.f64 #s(literal -1/315 binary64) r))))) (.f64 #s(literal 2/45 binary64) r)))) (.f64 #s(literal -1/3 binary64) r))) r)))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (.f64 (.f64 a a) r))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r))))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r))))) (*.f64 #s(literal -3/2 binary64) r))))))
#s(approx (/ (* (pow (sin a) 2) r) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2/45 binary64) r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/315 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r))) (fma.f64 #s(literal -61/240 binary64) r (.f64 #s(literal 7/8 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r))))) (.f64 #s(literal -3/2 binary64) r))))))
#s(approx (* (pow (sin a) 2) r) (.f64 (.f64 a a) r))
#s(approx (* (pow (sin a) 2) r) (.f64 (.f64 a a) (+.f64 r (.f64 #s(literal -1/3 binary64) (.f64 (*.f64 a a) r)))))
#s(approx (* (pow (sin a) 2) r) (.f64 (.f64 a a) (+.f64 r (.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 2/45 binary64) (.f64 (*.f64 a a) r)))))))
#s(approx (* (pow (sin a) 2) r) (.f64 (.f64 a a) (+.f64 r (.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 a a) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 a a) r) (*.f64 #s(literal 2/45 binary64) r))))))))
#s(approx (pow (sin a) 2) (*.f64 a a))
#s(approx (pow (sin a) 2) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 a a)))))
#s(approx (pow (sin a) 2) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 a a)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin a) 2) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (.f64 a a)))) #s(literal 1/3 binary64))))))
#s(approx (pow (cos a) 3) #s(literal 1 binary64))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -3/2 binary64) (.f64 a a))))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a a)) #s(literal 3/2 binary64)))))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (.f64 a a)))) #s(literal 3/2 binary64)))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) (*.f64 a r))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) (.f64 a (+.f64 r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) (.f64 a (+.f64 r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (.f64 #s(literal -1 binary64) r))))))
#s(approx (* 1 (/ (* (sin a) r) (pow (cos a) 2))) (.f64 a (+.f64 r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/120 binary64) r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (fma.f64 a (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (neg a) (*.f64 #s(literal -1 binary64) a))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))
#s(approx (/ (sin b) (cos (+ a b))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (fma.f64 a (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b)))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 b b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (fma.f64 a (fma.f64 a (.f64 b (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 7/6 binary64) (.f64 b b)))) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b))))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 b b))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (fma.f64 a (fma.f64 a (fma.f64 a (.f64 (.f64 b b) (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 b b)))) (.f64 b (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 7/6 binary64) (.f64 b b))))) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b))))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 b b))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 b b))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 b b) (.f64 a (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (*.f64 b b))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 b b) (.f64 a (fma.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 7/6 binary64) (.f64 b b))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (*.f64 b b)))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 b b) (.f64 a (fma.f64 a (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 7/6 binary64) (.f64 b b) (.f64 a (.f64 b (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 b b))))))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b)))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (*.f64 #s(literal 1/3 binary64) b))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (*.f64 b b))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2/3 binary64) (.f64 b b) (.f64 #s(literal 7/6 binary64) (.f64 a b)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2/3 binary64) (.f64 b b) (.f64 a (fma.f64 #s(literal 7/6 binary64) b (.f64 a (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 b b)))))))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) #s(literal 1/3 binary64))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 2/3 binary64) (.f64 a b))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+.f64 #s(literal 1/3 binary64) (.f64 a (fma.f64 #s(literal 2/3 binary64) b (.f64 #s(literal 7/6 binary64) a)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (+.f64 #s(literal 1/3 binary64) (.f64 a (fma.f64 #s(literal 2/3 binary64) b (.f64 a (+.f64 #s(literal 7/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 a b))))))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (*.f64 #s(literal -2/3 binary64) a))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (.f64 a (-.f64 (.f64 #s(literal -14/9 binary64) (*.f64 a a)) #s(literal 2/3 binary64))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -331/180 binary64) (*.f64 a a)) #s(literal 14/9 binary64))) #s(literal 2/3 binary64))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -3071/1890 binary64) (*.f64 a a)) #s(literal 331/180 binary64))) #s(literal 14/9 binary64))) #s(literal 2/3 binary64))))
#s(approx (/ (sin a) (pow (cos a) 2)) a)
#s(approx (/ (sin a) (pow (cos a) 2)) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal 5/6 binary64) (*.f64 a a)))))
#s(approx (/ (sin a) (pow (cos a) 2)) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 61/120 binary64) (*.f64 a a)))))))
#s(approx (/ (sin a) (pow (cos a) 2)) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 61/120 binary64) (.f64 #s(literal 277/1008 binary64) (*.f64 a a)))))))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (*.f64 #s(literal -1/3 binary64) a))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (.f64 a (-.f64 (.f64 #s(literal -23/18 binary64) (*.f64 a a)) #s(literal 1/3 binary64))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -601/360 binary64) (*.f64 a a)) #s(literal 23/18 binary64))) #s(literal 1/3 binary64))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -23183/15120 binary64) (*.f64 a a)) #s(literal 601/360 binary64))) #s(literal 23/18 binary64))) #s(literal 1/3 binary64))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (*.f64 #s(literal 1/3 binary64) a))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 23/18 binary64) (*.f64 a a)))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 23/18 binary64) (.f64 #s(literal 601/360 binary64) (*.f64 a a)))))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 23/18 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 601/360 binary64) (.f64 #s(literal 23183/15120 binary64) (*.f64 a a)))))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (*.f64 #s(literal 1/3 binary64) a))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 10/9 binary64) (*.f64 a a)))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 10/9 binary64) (.f64 #s(literal 47/45 binary64) (*.f64 a a)))))))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 10/9 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 47/45 binary64) (.f64 #s(literal 142/189 binary64) (*.f64 a a)))))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) #s(literal 1/3 binary64))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 7/6 binary64) (.f64 a a))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 #s(literal 89/72 binary64) (.f64 a a))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 89/72 binary64) (.f64 #s(literal 2047/2160 binary64) (.f64 a a))))))))
#s(approx (/ 1/2 (cos a)) #s(literal 1/2 binary64))
#s(approx (/ 1/2 (cos a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 a a))))
#s(approx (/ 1/2 (cos a)) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 5/48 binary64) (.f64 a a))))))
#s(approx (/ 1/2 (cos a)) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/48 binary64) (.f64 #s(literal 61/1440 binary64) (.f64 a a))))))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) #s(literal 1/6 binary64))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -11/12 binary64) (.f64 a a))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -163/144 binary64) (.f64 a a)) #s(literal 11/12 binary64)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -3911/4320 binary64) (.f64 a a)) #s(literal 163/144 binary64))) #s(literal 11/12 binary64)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (*.f64 a a))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 7/6 binary64) (.f64 a a)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 #s(literal 331/360 binary64) (.f64 a a)))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 331/360 binary64) (.f64 #s(literal 3071/5040 binary64) (.f64 a a)))))))))
#s(approx (/ 1/6 (cos a)) #s(literal 1/6 binary64))
#s(approx (/ 1/6 (cos a)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal 1/12 binary64) (.f64 a a))))
#s(approx (/ 1/6 (cos a)) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/12 binary64) (.f64 #s(literal 5/144 binary64) (.f64 a a))))))
#s(approx (/ 1/6 (cos a)) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/12 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/144 binary64) (.f64 #s(literal 61/4320 binary64) (.f64 a a))))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) a)
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal 5/6 binary64) (*.f64 a a)))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 61/120 binary64) (*.f64 a a)))))))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 61/120 binary64) (.f64 #s(literal 277/1008 binary64) (*.f64 a a)))))))))
#s(approx (pow (cos a) -1) #s(literal 1 binary64))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 a a))))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 5/24 binary64) (.f64 a a))))))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/24 binary64) (.f64 #s(literal 61/720 binary64) (.f64 a a))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 a a) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/144 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/240 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))))))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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)))))
#s(approx (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)))) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))
#s(approx (pow (cos a) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))
#s(approx (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a)) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a)))
#s(approx (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))))
#s(approx (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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)))))
#s(approx (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a))) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (sin a) 2) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))
#s(approx (pow (cos a) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)))) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))
#s(approx (/ (sin a) (pow (cos a) 2)) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))
#s(approx (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a)) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))
#s(approx (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (/ 1/2 (cos a)) (/.f64 #s(literal 1/2 binary64) (cos.f64 a)))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (/ 1/6 (cos a)) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))
#s(approx (* 1 (/ (sin a) (pow (cos a) 2))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (cos a) -1) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.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)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin 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 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (-.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))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (tan.f64 b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) a)))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (sin b) b)
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx b b)
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/6 binary64) (.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 b b))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 b b)))) #s(literal 1/2 binary64)))))
#s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin b) (sin a)) (.f64 b (+.f64 (sin.f64 a) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) (sin.f64 a))))))
#s(approx (* (sin b) (sin a)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin b) (sin a)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) (sin.f64 a)) (.f64 #s(literal 1/120 binary64) (sin.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 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (/.f64 r (cos.f64 a)))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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)))))
#s(approx (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 a (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r)))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 b (fma.f64 a (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))) (.f64 b (fma.f64 #s(literal 1/3 binary64) r (.f64 (.f64 a a) (-.f64 r (.f64 #s(literal -1/6 binary64) r)))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 b (fma.f64 a (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))) (.f64 b (fma.f64 #s(literal 1/3 binary64) r (fma.f64 a (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))) (.f64 #s(literal 2/3 binary64) r))) (.f64 (.f64 a a) (-.f64 r (.f64 #s(literal -1/6 binary64) r))))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 #s(literal 1/2 binary64) (.f64 a (*.f64 b r))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (.f64 a r) (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r)))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (.f64 a r) (.f64 b (+.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))) (.f64 a (.f64 b (-.f64 r (*.f64 #s(literal -1/6 binary64) r))))))))))
#s(approx (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (.f64 a r) (.f64 b (+.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))) (.f64 b (fma.f64 a (-.f64 r (.f64 #s(literal -1/6 binary64) r)) (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))) (.f64 #s(literal 2/3 binary64) r)))))))))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 #s(literal 1/2 binary64) (.f64 b r)))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 b (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))) (.f64 #s(literal -1/2 binary64) r))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))) (.f64 b (-.f64 r (.f64 #s(literal -1/6 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))
#s(approx (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) (.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))) (.f64 b (-.f64 (+.f64 r (.f64 #s(literal -1 binary64) (.f64 a (.f64 b (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))) (.f64 #s(literal -1/6 binary64) r))))) (.f64 #s(literal -1/2 binary64) r))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -17/90 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (.f64 #s(literal 17/270 binary64) r))))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))))
#s(approx (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/15 binary64) r) r) (fma.f64 #s(literal -31/315 binary64) r (fma.f64 #s(literal -17/630 binary64) r (fma.f64 #s(literal 1/10080 binary64) r (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (.f64 #s(literal 31/945 binary64) r)))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (.f64 #s(literal -1/240 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))) (fma.f64 #s(literal 1/1440 binary64) r (fma.f64 #s(literal 1/24 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal 11/15 binary64) r))))))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (fma.f64 #s(literal -17/90 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (.f64 #s(literal 17/270 binary64) r))))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))))))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/9 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -17/90 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (.f64 #s(literal 17/270 binary64) r))))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/9 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -17/90 binary64) r (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (fma.f64 #s(literal 17/270 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/15 binary64) r) r) (fma.f64 #s(literal -31/315 binary64) r (fma.f64 #s(literal -17/630 binary64) r (fma.f64 #s(literal 1/10080 binary64) r (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (.f64 #s(literal 31/945 binary64) r)))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (.f64 #s(literal -1/240 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))) (fma.f64 #s(literal 1/1440 binary64) r (fma.f64 #s(literal 1/24 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal 11/15 binary64) r))))))))))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (* r (pow (tan b) 2)) (.f64 (.f64 b b) r))
#s(approx (* r (pow (tan b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal 2/3 binary64) (.f64 (*.f64 b b) r)))))
#s(approx (* r (pow (tan b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal 17/45 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 2/3 binary64) r))))))
#s(approx (* r (pow (tan b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal 2/3 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal 62/315 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 17/45 binary64) r))))))))
#s(approx (pow (tan b) 2) (*.f64 b b))
#s(approx (pow (tan b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b)))))
#s(approx (pow (tan b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 2/3 binary64) (.f64 #s(literal 17/45 binary64) (.f64 b b)))))))
#s(approx (pow (tan b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 2/3 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 17/45 binary64) (.f64 #s(literal 62/315 binary64) (.f64 b b)))))))))
#s(approx (tan b) b)
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 2/15 binary64) (*.f64 b b)))))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 2/15 binary64) (.f64 #s(literal 17/315 binary64) (*.f64 b b)))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/6 binary64) r))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/9 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (.f64 #s(literal 17/270 binary64) r)))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/9 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (fma.f64 #s(literal 17/270 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/15 binary64) r) r) (fma.f64 #s(literal -17/630 binary64) r (fma.f64 #s(literal 1/10080 binary64) r (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (.f64 #s(literal 31/945 binary64) r))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (.f64 #s(literal -1/240 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))) (fma.f64 #s(literal 1/1440 binary64) r (fma.f64 #s(literal 1/24 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal 11/15 binary64) r)))))))))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (.f64 #s(literal -1/240 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/15 binary64) r) r) (fma.f64 #s(literal -17/630 binary64) r (fma.f64 #s(literal 1/10080 binary64) r (.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (.f64 #s(literal -1/240 binary64) r))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))) (fma.f64 #s(literal 1/1440 binary64) r (fma.f64 #s(literal 1/24 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal 11/15 binary64) r))))))))) (+.f64 r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/12 binary64) r)) r)))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (.f64 #s(literal -1/240 binary64) r))) r)))) r)))))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r) (fma.f64 #s(literal -1/15 binary64) r (fma.f64 #s(literal -1/240 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/15 binary64) r) r) (fma.f64 #s(literal -17/630 binary64) r (fma.f64 #s(literal 1/10080 binary64) r (.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) r))))) (*.f64 #s(literal 11/15 binary64) r)))))) r)))) r)))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (.f64 #s(literal -1/2 binary64) (.f64 b r)))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) r)))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/15 binary64) r) r))) r)))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/15 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -17/630 binary64) r) (*.f64 #s(literal 11/15 binary64) r)))) r))) r)))))
#s(approx (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (.f64 b (+.f64 r (.f64 #s(literal 1/3 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* r (tan b)) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal 2/15 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/3 binary64) r))))))
#s(approx (* r (tan b)) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal 1/3 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal 17/315 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 2/15 binary64) r))))))))
#s(approx (neg (* r (pow (tan b) 3))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) r)))
#s(approx (neg (* r (pow (tan b) 3))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) r)) r)))
#s(approx (neg (* r (pow (tan b) 3))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -11/15 binary64) (.f64 (.f64 b b) r)) r)) r)))
#s(approx (neg (* r (pow (tan b) 3))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -88/189 binary64) (.f64 (.f64 b b) r)) (*.f64 #s(literal 11/15 binary64) r))) r)) r)))
#s(approx (* r (pow (tan b) 3)) (*.f64 (pow.f64 b #s(literal 3 binary64)) r))
#s(approx (* r (pow (tan b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (*.f64 b b) r))))
#s(approx (* r (pow (tan b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal 11/15 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* r (pow (tan b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal 88/189 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 11/15 binary64) r))))))))
#s(approx (pow (tan b) 3) (pow.f64 b #s(literal 3 binary64)))
#s(approx (pow (tan b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 b b))))
#s(approx (pow (tan b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 11/15 binary64) (*.f64 b b)))))))
#s(approx (pow (tan b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 11/15 binary64) (.f64 #s(literal 88/189 binary64) (*.f64 b b)))))))))
#s(approx (* 1 (* r (pow (tan b) 2))) (.f64 (.f64 b b) r))
#s(approx (* 1 (* r (pow (tan b) 2))) (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal 2/3 binary64) (.f64 (*.f64 b b) r)))))
#s(approx (* 1 (* r (pow (tan b) 2))) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal 17/45 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 2/3 binary64) r))))))
#s(approx (* 1 (* r (pow (tan b) 2))) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal 2/3 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal 62/315 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 17/45 binary64) r))))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (/.f64 b (cos.f64 a)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (fma.f64 b (fma.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (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 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 b (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) (sin.f64 a)) (.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (.f64 (/.f64 r b) (/.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 (.f64 b (cos.f64 a)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (+.f64 (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))) (.f64 (/.f64 r b) (/.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 (.f64 b (cos.f64 a)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (+.f64 (/.f64 r (.f64 (pow.f64 b #s(literal 3 binary64)) (cos.f64 a))) (+.f64 (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))) (.f64 (/.f64 r b) (/.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 (*.f64 b (cos.f64 a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (.f64 (/.f64 r b) (/.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 (.f64 b (cos.f64 a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (+.f64 (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))) (.f64 (/.f64 r b) (/.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 (.f64 b (cos.f64 a)))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (+.f64 (/.f64 r (.f64 (pow.f64 b #s(literal 3 binary64)) (cos.f64 a))) (+.f64 (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))) (.f64 (/.f64 r b) (/.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 (*.f64 b (cos.f64 a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (.f64 (/.f64 r b) (/.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 (*.f64 b (cos.f64 a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (+.f64 (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))) (.f64 (/.f64 r b) (/.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 (*.f64 b (cos.f64 a)))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (.f64 b (cos.f64 a))) (.f64 (/.f64 r b) (/.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 (.f64 b (cos.f64 a)))))))
#s(approx (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))
#s(approx (pow (tan b) 2) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))
#s(approx (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))
#s(approx (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))
#s(approx (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (tan b) 3) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a))) (+.f64 (pow.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) (cos.f64 a)) #s(literal -1 binary64)) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a))) (+.f64 (pow.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) (cos.f64 a)) #s(literal -1 binary64)) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 a)))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 #s(literal -1 binary64) (*.f64 (/.f64 r b) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 r (.f64 b (cos.f64 a))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b))) b)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (fma.f64 (/.f64 r b) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (.f64 r (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/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) b) (/ r (cos a))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 r (.f64 b (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) b) (* 1 (/ (* (sin a) r) (pow (cos a) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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 #s(literal -1 binary64) (.f64 (/.f64 r b) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)))))
#s(approx (+ (* (neg b) (+ (* (/ (* (sin a) r) (pow (cos a) 2)) -1/3) (neg (/ (* (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3))))) (sin a)) (cos a))))) (- (* -1/6 (/ r (cos a))) (+ (* (/ r (cos a)) -1/2) (neg (/ (* (pow (sin a) 2) r) (pow (cos a) 3)))))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (/.f64 (.f64 r (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))))) (cos.f64 a))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 a)))))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)))))
#s(approx (* (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 a)) #s(literal -1 binary64)) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b))) b)))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (sin.f64 a) (.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) b) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (.f64 b (cos.f64 a)) #s(literal -1 binary64))) b) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))
#s(approx (+ (* (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) b) (* 1 (/ (sin a) (pow (cos a) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)))))
#s(approx (+ (* (neg b) (+ (* (/ (sin a) (pow (cos a) 2)) -1/3) (neg (/ (* (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a)))) (sin a)) (cos a))))) (- (/ 1/2 (cos a)) (+ (* (/ (pow (sin a) 2) (pow (cos a) 3)) -1) (/ 1/6 (cos a))))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))))))

eval403.0ms (0.6%)

Memory: -15.2MiB live, 471.5MiB allocated; 142ms collecting garbage
Compiler: Compiled 166 014 to 11 276 computations (93.2% saved)

prune15.7s (24.4%)

Memory

93.9MiB live, 14 901.7MiB allocated; 1.9s collecting garbage

Pruning

11 alts after pruning (8 fresh and 3 done)

	Pruned	Kept	Total
New	1 728	7	1 735
Fresh	0	1	1
Picked	2	3	5
Done	0	0	0
Total	1 730	11	1 741

Accuracy

99.9%

Counts

1 741 → 11

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	78.3%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
	99.4%	(.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))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶	99.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 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))))
▶	99.4%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
	65.6%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
✓	99.6%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶	59.9%	#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
	99.2%	#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
✓	59.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
✓	48.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
▶	18.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))

Compiler

Compiled 1 598 to 613 computations (61.6% saved)

series385.0ms (0.6%)

Memory

-32.5MiB live, 419.7MiB allocated; 91ms collecting garbage

Counts

88 → 608

Calls

Call 1

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

Outputs
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* r (+ (* 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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (* r (- (+ (* -1 (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))) (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))) (* -1/2 (/ (sin b) (* a (cos b)))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* r (- (+ (* -1 (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))) (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))) (* -1/2 (/ (sin b) (* a (cos b))))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* r (+ (* -1 (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))) (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* r (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* r (pow (sin b) 2))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* r (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (/ (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* r (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* r (pow (sin b) 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* r (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))))
#s(approx (/ r (pow a 3)) #s(hole binary64 (/ r (pow a 3))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* r (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))
#s(approx (/ r a) #s(hole binary64 (/ r a)))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (* a (cos b))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* r (sin b)) (* a (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* r (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* r (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* r (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b)))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -3/2 (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (* r (- (+ (* -1 (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))) (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))) (* 1/2 (/ (sin b) (* a (cos b))))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))) (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))) (* 1/2 (/ (sin b) (* a (cos b)))))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* -1 (* r (+ (* -1 (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))) (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* -1 (/ (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))) (cos b)))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* -1 (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* -1 (* r (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* 3/2 (/ (sin b) (cos b))))))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* 3/2 (/ (sin b) (cos b))))))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* 3/2 (/ (sin b) (cos b))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow a 3)))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* -1/2 (pow a 2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* 13/120 (pow a 2)) 1/2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 13/120 (* -41/3024 (pow a 2)))) 1/2))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin 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 (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos 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 (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (pow a 3) #s(hole binary64 (pow a 3)))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (/ (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (+ (* a (+ (/ (* a (* r (pow (sin b) 3))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (* a (+ (/ (* a (* r (pow (sin b) 3))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 3))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (pow a 2))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (* (pow a 2) (pow (cos b) 2))))
#s(approx (* a (cos b)) #s(hole binary64 (* a (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (* r (sin b)) (cos b))) (* a (- (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))))) (pow (cos b) 8)) (/ (* r (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 9))))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (sin b) (cos b))) (* a (- (/ (pow (sin b) 4) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))))) (pow (cos b) 8)) (/ (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 9))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (* -3/2 (cos b))) (* -3 (cos b)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (+ (* -3/2 (cos b)) (* a (- (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* 3/2 (sin b)) (* 2 (/ (pow (sin b) 3) (pow (cos b) 2))))) (+ (* -1 (sin b)) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (+ (* 3 (sin b)) (/ (pow (sin b) 3) (pow (cos b) 2)))))))))) (* -3 (cos b)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (pow (cos b) 2)) (* a (- (+ (* -1 (* (cos b) (sin b))) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (/ (pow (sin b) 3) (cos b))))) (+ (* -2 (* (cos b) (sin b))) (+ (* -1 (/ (* (sin b) (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (* 2 (/ (pow (sin b) 3) (cos b)))))))) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos b) 6)))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (* (pow (cos b) 3) (pow (sin b) 3))))) (pow (cos b) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 4 (pow (cos b) 6)) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (cos b) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (pow (cos b) 6)))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* 4 (* (pow a 2) (pow (cos b) 6))))) (pow (cos b) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* (pow a 2) (+ (* -47/15 (* (pow a 2) (pow (cos b) 6))) (* 4 (pow (cos b) 6)))))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (* (pow (cos b) 2) (pow (sin b) 4)))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* a (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 2 (* (cos b) (* (pow (sin b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* (cos b) (* (sin b) (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (sin b) 2) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* a (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* -2 (* a (pow (cos b) 4))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* a (+ (* -2 (pow (cos b) 4)) (* a (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* a (* (pow (cos b) 3) (sin b))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (- (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* -1 (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (+ (* 1/3 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))) (pow (sin b) 4))) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (* (pow (cos b) 3) (sin b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (+ (* a (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow (sin a) 3)))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) a)))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a)))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) a)))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* a (- (+ (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (* (pow (cos a) 6) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (- (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* 1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* 1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* 1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (- (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* 1/2 (/ (* r (sin b)) (cos b)))) a)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (- (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (* 1/2 (/ (* r (sin b)) (cos b)))) a)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (- (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))) (* 1/2 (/ (* r (sin b)) (cos b)))) a)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))) a)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))) a))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (* a (+ (* -1 (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (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 b #s(hole binary64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin 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 a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (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 (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (* 1/2 (* (pow a 2) r))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* a (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (* (pow a 2) (- r (* -1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (+ (* a (* b (+ (* -1 (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* 2/3 r)))) (* (pow a 2) (- r (* -1/6 r)))))))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (* b (- (/ r (pow a 3)) (* -1/2 (/ r a)))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* b (+ (* (pow a 3) (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2))))) (* (pow a 3) (- (/ r (pow a 3)) (* -1/2 (/ r a))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* b (+ (* b (+ (* (pow a 3) (* b (- (+ (* 1/3 (/ r (pow a 3))) (/ r a)) (* -1/6 (/ r a))))) (* (pow a 3) (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))))) (* (pow a 3) (- (/ r (pow a 3)) (* -1/2 (/ r a))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* (pow a 3) (* b (- (+ (* -1 (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))) (* -1/3 (/ r (pow a 2)))) (* -1 (/ r (pow a 2)))))) (* (pow a 3) (- (+ (* 1/3 (/ r (pow a 3))) (/ r a)) (* -1/6 (/ r a)))))) (* (pow a 3) (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))))) (* (pow a 3) (- (/ r (pow a 3)) (* -1/2 (/ r a))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (/ r (pow a 3)) (* -1/2 (/ r a))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))) (/ r (pow a 3))) (* -1/2 (/ r a))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (- (+ (* 1/3 (/ r (pow a 3))) (/ r a)) (* -1/6 (/ r a)))) (/ r (pow a 2))))) (/ r (pow a 3))) (* -1/2 (/ r a))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (- (+ (* 1/3 (/ r (pow a 3))) (+ (* b (- (+ (* -1 (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))) (* -1/3 (/ r (pow a 2)))) (* -1 (/ r (pow a 2))))) (/ r a))) (* -1/6 (/ r a)))) (/ r (pow a 2))))) (/ r (pow a 3))) (* -1/2 (/ r a))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (* b r) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* b (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))) (/ r (pow a 3))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* b (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (+ (* 1/3 (/ r (pow a 3))) (/ r a))) (/ r (pow a 2))))) (/ r (pow a 3))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* b (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (+ (* 1/3 (/ r (pow a 3))) (+ (* b (- (+ (* -1 (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))) (* -1/3 (/ r (pow a 2)))) (* -1 (/ r (pow a 2))))) (/ r a)))) (/ r (pow a 2))))) (/ r (pow a 3))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (* 7/8 r)))))))) (+ (* -1/2 (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* 13/120 r)))))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* -1/3 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* 2/45 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* (pow b 2) (+ (* -1/315 (* (pow b 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* 1/6 r)))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (* 7/8 r))))))) (+ (* -1/2 (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* 13/120 r))))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r))))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* 7/8 r)))))) (+ (* -1/2 (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* 13/120 r)))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) r))))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (* -1/2 r))))) r))))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* 7/8 r)))))) (* 13/120 r))))))) (* -1/2 r))))) r))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))) r))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (* 7/8 r))) (* 13/120 r))))) (* -1/2 r)))) r))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b r)))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (+ (* 1/120 r) (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (* -1/2 r) (* -3/2 r)))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (+ (* 13/120 r) (* (pow b 2) (- (* -41/3024 r) (+ (* -3/2 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/2 r) (* -3/2 r)))))))) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* -1/2 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* 13/120 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) r)) (* 13/120 r)))))))))
#s(approx (pow (cos b) 3) #s(hole binary64 1))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (* b r) (pow a 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* b (+ (/ r (pow a 3)) (/ (* b r) (pow a 2))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* 1/3 (/ r (pow a 3))) (/ r a))) (/ r (pow a 2)))) (/ r (pow a 3))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* 1/3 (/ r (pow a 3))) (+ (* b (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (/ r a)))) (/ r (pow a 2)))) (/ r (pow a 3))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (* (pow b 2) r) (pow a 2))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* (pow b 2) (+ (/ r (pow a 2)) (/ (* b r) a)))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* b (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (/ r a))) (/ r (pow a 2))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* b (- (+ (* -1/3 (/ r (pow a 2))) (/ (* b r) a)) (* -1 (/ r (pow a 2))))) (/ r a))) (/ r (pow a 2))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (/ (* (pow b 2) r) (pow a 2))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (/ r (pow a 2))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (- (+ (* -1/3 (/ r (pow a 2))) (* (pow b 2) (- (* 2/45 (/ r (pow a 2))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/3 (/ r (pow a 2))))))) (* -1 (/ r (pow a 2))))) (/ r (pow a 2))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (- (+ (* -1/3 (/ r (pow a 2))) (* (pow b 2) (- (+ (* 2/45 (/ r (pow a 2))) (* (pow b 2) (- (* -1/315 (/ r (pow a 2))) (+ (* -1 (- (* 2/45 (/ r (pow a 2))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/3 (/ r (pow a 2)))))) (+ (* -2/45 (/ r (pow a 2))) (* 1/3 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2)))))))))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/3 (/ r (pow a 2))))))) (* -1 (/ r (pow a 2))))) (/ r (pow a 2))))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow b 2))) (pow a 2))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow a 2)) (* 1/3 (* (pow a 2) (pow b 2))))) (pow a 2))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow a 2)) (* (pow b 2) (+ (* -2/45 (* (pow a 2) (pow b 2))) (* 1/3 (pow a 2)))))) (pow a 2))))
#s(approx (* a (cos b)) #s(hole binary64 a))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (/ (* (pow b 3) r) a)))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ (/ r a) (/ (* (pow b 2) r) a)))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* 11/15 (/ (* (pow b 2) r) a)) (/ r a))) (/ r a)))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 88/189 (/ (* (pow b 2) r) a)) (* 11/15 (/ r a)))) (/ r a))) (/ r a)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (pow b 2)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* 11/15 (pow b 2))))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* (pow b 2) (+ 11/15 (* 88/189 (pow b 2))))))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* -1/2 (/ (* b r) a))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* b (+ (* -1/2 (/ r a)) (* -1/6 (/ (* (pow b 2) r) a))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* b (+ (* -1/2 (/ r a)) (* (pow b 2) (+ (* -1/6 (/ r a)) (* -1/15 (/ (* (pow b 2) r) a))))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* b (+ (* -1/2 (/ r a)) (* (pow b 2) (+ (* -1/6 (/ r a)) (* (pow b 2) (+ (* -1/15 (/ r a)) (* -17/630 (/ (* (pow b 2) r) a))))))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* b r) a)))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) r) a)) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) r) a)) (* 1/3 (/ r a)))) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ r a)) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) r) a)) (* 2/15 (/ r a)))))) (/ r a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (* (pow a 2) (- (* -1 r) (* -3/2 r)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (+ (* a (* b r)) (* (pow a 2) (- (* -1 r) (* -3/2 r))))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (+ (* b (+ (* a r) (* b (- (+ (* -1/6 r) (* (pow a 2) (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -1/2 r))))) (* (pow a 2) (- (* -1 r) (* -3/2 r))))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (+ (* b (+ (* a r) (* b (- (+ (* -1/6 r) (+ (* a (* b (- (* -1/3 r) (* -1 r)))) (* (pow a 2) (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r)))))) (* -1/2 r))))) (* (pow a 2) (- (* -1 r) (* -3/2 r))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* a (* b (- (* -1 r) (* -3/2 r))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* a (- (* -1 r) (* -3/2 r))) (* b r)))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* a (- (* -1 r) (* -3/2 r))) (* b (+ r (* a (* b (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r)))))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* a (- (* -1 r) (* -3/2 r))) (* b (+ r (* b (+ (* a (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r)))) (* b (- (* -1/3 r) (* -1 r)))))))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (* -1 r) (* -3/2 r)))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (+ (* -1 r) (* (pow b 2) (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -3/2 r)))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (* -121/120 r) (+ (* -3/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))))) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -3/2 r)))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (+ (* -121/120 r) (* (pow b 2) (- (* 1093/5040 r) (+ (* -3/2 (- (* -121/120 r) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))) (+ (* -3/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* 61/240 r) (* 7/8 (- (* 13/6 r) (* 3/2 r))))))))) (+ (* -3/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))))) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -3/2 r)))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* -1 (* b r))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (- (* 13/6 r) (* 3/2 r)))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (* -121/120 r) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r))))) (* 3/2 r)))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (+ (* -121/120 r) (* (pow b 2) (- (* 1093/5040 r) (+ (* -3/2 (- (* -121/120 r) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))) (+ (* 61/240 r) (* 7/8 (- (* 13/6 r) (* 3/2 r)))))))) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r))))) (* 3/2 r)))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* -1 (* b r))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* b (+ (* -1 r) (* 13/6 (* (pow b 2) r))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (+ (* -121/120 (* (pow b 2) r)) (* 13/6 r)))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (+ (* 13/6 r) (* (pow b 2) (+ (* -121/120 r) (* 1093/5040 (* (pow b 2) r))))))))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* -1 b)))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* b (- (* 13/6 (pow b 2)) 1))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* b (- (* (pow b 2) (+ 13/6 (* -121/120 (pow b 2)))) 1))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* b (- (* (pow b 2) (+ 13/6 (* (pow b 2) (- (* 1093/5040 (pow b 2)) 121/120)))) 1))))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 -1))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (- (* 2 (pow b 2)) 1)))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (- (* (pow b 2) (+ 2 (* -2/3 (pow b 2)))) 1)))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (- (* (pow b 2) (+ 2 (* (pow b 2) (- (* 4/45 (pow b 2)) 2/3)))) 1)))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -3/2 (* b r))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -3/2 r) (* -3/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -3/2 r) (* (pow b 2) (+ (* -3/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -3/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -3/2 r) (* (pow b 2) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -3/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -3/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (/ (* r (pow (sin a) 3)) (pow (cos a) 4)) (+ (* -1 (/ (* (sin a) (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7))))) (pow (cos a) 9)) (/ (* r (+ (* -1 (* (pow (cos a) 4) (pow (sin a) 3))) (+ (* 3/2 (* (pow (cos a) 6) (sin a))) (* (pow (cos a) 3) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))))) (pow (cos a) 8)))))) (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 10/3 (/ 1 (cos a))) (* b (- (+ (* -1 (/ (sin a) (pow (cos a) 2))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (+ (* -1/6 (/ (sin a) (pow (cos a) 2))) (/ (pow (sin a) 3) (pow (cos a) 4))))) (+ (* -1 (/ (* (sin a) (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (+ (* 2 (/ (pow (sin a) 3) (pow (cos a) 4))) (/ (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 9))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (* -3/2 (cos a))) (* -3 (cos a)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (+ (* -3/2 (cos a)) (* b (- (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* 3/2 (sin a)) (* 2 (/ (pow (sin a) 3) (pow (cos a) 2))))) (+ (* -1 (sin a)) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (+ (* 3 (sin a)) (/ (pow (sin a) 3) (pow (cos a) 2)))))))))) (* -3 (cos a)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -3 (pow (cos a) 2)) (* b (- (+ (* -1 (* (cos a) (sin a))) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (/ (pow (sin a) 3) (cos a)))) (+ (* -2 (* (cos a) (sin a))) (+ (* -1 (/ (* (sin a) (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (* 2 (/ (pow (sin a) 3) (cos a)))))))) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos a) 6)))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (* (pow (cos a) 3) (pow (sin a) 3))))) (pow (cos a) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 4 (pow (cos a) 6)) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3)))))) (pow (cos a) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (pow (cos a) 6)))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* 4 (* (pow b 2) (pow (cos a) 6))))) (pow (cos a) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* (pow b 2) (+ (* -47/15 (* (pow b 2) (pow (cos a) 6))) (* 4 (pow (cos a) 6)))))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (* (pow (cos a) 2) (pow (sin a) 4)))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* b (+ (* -1/3 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 2 (* (pow (cos a) 2) (* (pow (sin a) 3) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* (cos a) (* (sin a) (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (sin a) 2) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* b (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* -2 (* b (pow (cos a) 4))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* b (+ (* -2 (pow (cos a) 4)) (* b (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* b (* (pow (cos a) 3) (sin a))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (- (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* 1/3 (* (cos a) (sin a))) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a)))))))))) (pow (sin a) 4))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (* (pow (cos a) 3) (sin a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (* (pow (cos a) 2) (pow (sin a) 2))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin 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 (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow (sin b) 3)))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (/ (pow (sin b) 3) (pow (cos b) 3))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))

Calls

9 calls:

Time	Variable		Point	Expression
73.0ms	r	@	0	((* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (sin a) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin a) (sin b)) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) 2 (pow (cos b) 2) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) 1/6 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (sin b)) (cos b)) (* r (sin b)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* r (pow (sin b) 3)) (pow (cos b) 3) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/ r (pow a 3)) (tan b) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (pow (* a (cos b)) 2) (* a (cos b)) (* (/ r a) (pow (tan b) 3)) (/ r a) (pow (tan b) 3) (* -1/2 (* (/ r a) (tan b))) (* (/ r a) (tan b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (* -3/2 (/ (* r (sin b)) (cos b))) -3/2 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (sin a) (sin b)) 3) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (pow (* (cos a) (cos b)) 2) 3) (pow (* (cos a) (cos b)) 2) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b))
59.0ms	r	@	-inf	((* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (sin a) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin a) (sin b)) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) 2 (pow (cos b) 2) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) 1/6 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (sin b)) (cos b)) (* r (sin b)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* r (pow (sin b) 3)) (pow (cos b) 3) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/ r (pow a 3)) (tan b) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (pow (* a (cos b)) 2) (* a (cos b)) (* (/ r a) (pow (tan b) 3)) (/ r a) (pow (tan b) 3) (* -1/2 (* (/ r a) (tan b))) (* (/ r a) (tan b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (* -3/2 (/ (* r (sin b)) (cos b))) -3/2 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (sin a) (sin b)) 3) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (pow (* (cos a) (cos b)) 2) 3) (pow (* (cos a) (cos b)) 2) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b))
45.0ms	b	@	inf	((* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (sin a) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin a) (sin b)) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) 2 (pow (cos b) 2) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) 1/6 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (sin b)) (cos b)) (* r (sin b)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* r (pow (sin b) 3)) (pow (cos b) 3) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/ r (pow a 3)) (tan b) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (pow (* a (cos b)) 2) (* a (cos b)) (* (/ r a) (pow (tan b) 3)) (/ r a) (pow (tan b) 3) (* -1/2 (* (/ r a) (tan b))) (* (/ r a) (tan b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (* -3/2 (/ (* r (sin b)) (cos b))) -3/2 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (sin a) (sin b)) 3) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (pow (* (cos a) (cos b)) 2) 3) (pow (* (cos a) (cos b)) 2) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b))
37.0ms	b	@	-inf	((* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (sin a) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin a) (sin b)) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) 2 (pow (cos b) 2) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) 1/6 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (sin b)) (cos b)) (* r (sin b)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* r (pow (sin b) 3)) (pow (cos b) 3) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/ r (pow a 3)) (tan b) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (pow (* a (cos b)) 2) (* a (cos b)) (* (/ r a) (pow (tan b) 3)) (/ r a) (pow (tan b) 3) (* -1/2 (* (/ r a) (tan b))) (* (/ r a) (tan b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (* -3/2 (/ (* r (sin b)) (cos b))) -3/2 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (sin a) (sin b)) 3) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (pow (* (cos a) (cos b)) 2) 3) (pow (* (cos a) (cos b)) 2) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b))
29.0ms	b	@	0	((* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (sin a) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin a) (sin b)) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) 2 (pow (cos b) 2) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) 1/6 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (sin b)) (cos b)) (* r (sin b)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* r (pow (sin b) 3)) (pow (cos b) 3) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/ r (pow a 3)) (tan b) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (pow (* a (cos b)) 2) (* a (cos b)) (* (/ r a) (pow (tan b) 3)) (/ r a) (pow (tan b) 3) (* -1/2 (* (/ r a) (tan b))) (* (/ r a) (tan b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (* -3/2 (/ (* r (sin b)) (cos b))) -3/2 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (sin a) (sin b)) 3) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (pow (* (cos a) (cos b)) 2) 3) (pow (* (cos a) (cos b)) 2) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b))

rewrite378.0ms (0.6%)

Memory

32.1MiB live, 452.2MiB allocated; 44ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3262	46459
0	3477	41178
0	10383	39911

Stop Event

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

Counts

696 → 839

Calls

Call 1

Inputs
(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
r
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(sin.f64 b)
b
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
a
(cos.f64 b)
#s(literal 3 binary64)
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(sin.f64 a)
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (sin.f64 a) (sin.f64 b))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
(.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))
(pow.f64 a #s(literal 3 binary64))
(-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
#s(literal -1 binary64)
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))
#s(literal -1/2 binary64)
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
#s(literal 2 binary64)
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))
#s(literal 1/6 binary64)
(/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))
(.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
(-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))
(*.f64 r (sin.f64 b))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
(fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
(/.f64 r (pow.f64 a #s(literal 3 binary64)))
(tan.f64 b)
(+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
(/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64))
(*.f64 a (cos.f64 b))
(*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))
(/.f64 r a)
(pow.f64 (tan.f64 b) #s(literal 3 binary64))
(.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))
(*.f64 (/.f64 r a) (tan.f64 b))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
(fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))
(fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
(/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))
#s(literal -3/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 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))))
(/.f64 (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 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))
(-.f64 (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)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
(+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))
(+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(.f64 (+.f64 (pow.f64 (.f64 (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 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(cos.f64 (+.f64 a b))
(+.f64 a b)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* r (+ (* 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/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (* r (- (+ (* -1 (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))) (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))) (* -1/2 (/ (sin b) (* a (cos b)))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* r (- (+ (* -1 (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))) (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))) (* -1/2 (/ (sin b) (* a (cos b))))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* r (+ (* -1 (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))) (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* r (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* r (pow (sin b) 2))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* r (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (cos b))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (/ (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* r (* (sin b) (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* r (- (* -1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* r (pow (sin b) 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* r (+ (/ (sin b) (* (pow a 3) (cos b))) (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))))
#s(approx (/ r (pow a 3)) #s(hole binary64 (/ r (pow a 3))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* r (+ (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2))) (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))
#s(approx (/ r a) #s(hole binary64 (/ r a)))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (* a (cos b))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* r (sin b)) (* a (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* r (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* r (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* r (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b)))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -3/2 (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))) (* 1/2 (/ (sin b) (cos b))))))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (* r (- (+ (* -1 (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))) (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))) (* 1/2 (/ (sin b) (* a (cos b))))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* -1 (* r (- (+ (* -1 (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))) (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))) (* 1/2 (/ (sin b) (* a (cos b)))))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* -1 (* r (+ (* -1 (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))) (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))) (cos b)))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* -1 (/ (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))) (cos b)))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* -1 (* r (* (sin b) (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3)))))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* -1 (* r (- (* 1/2 (/ (sin b) (cos b))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (* (pow a 3) (cos b)))) (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3))))))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (* (pow a 2) (pow (cos b) 2)))) (* -1 (/ (pow (sin b) 3) (* a (pow (cos b) 3)))))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* 3/2 (/ (sin b) (cos b))))))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* 3/2 (/ (sin b) (cos b))))))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* 3/2 (/ (sin b) (cos b))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow a 3)))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* -1/2 (pow a 2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* 13/120 (pow a 2)) 1/2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 13/120 (* -41/3024 (pow a 2)))) 1/2))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin 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 (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos 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 (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (pow a 3) #s(hole binary64 (pow a 3)))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (/ (+ (* a (+ (* a (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (+ (* a (+ (/ (* a (* r (pow (sin b) 3))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (* a (+ (/ (* a (* r (pow (sin b) 3))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 3))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (pow a 2))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (* (pow a 2) (pow (cos b) 2))))
#s(approx (* a (cos b)) #s(hole binary64 (* a (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (* r (sin b)) (cos b))) (* a (- (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))))) (pow (cos b) 8)) (/ (* r (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 9))))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (sin b) (cos b))) (* a (- (/ (pow (sin b) 4) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))))) (pow (cos b) 8)) (/ (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 9))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (* -3/2 (cos b))) (* -3 (cos b)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (+ (* -3/2 (cos b)) (* a (- (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* 3/2 (sin b)) (* 2 (/ (pow (sin b) 3) (pow (cos b) 2))))) (+ (* -1 (sin b)) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (+ (* 3 (sin b)) (/ (pow (sin b) 3) (pow (cos b) 2)))))))))) (* -3 (cos b)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (pow (cos b) 2)) (* a (- (+ (* -1 (* (cos b) (sin b))) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (/ (pow (sin b) 3) (cos b))))) (+ (* -2 (* (cos b) (sin b))) (+ (* -1 (/ (* (sin b) (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (* 2 (/ (pow (sin b) 3) (cos b)))))))) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos b) 6)))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (* (pow (cos b) 3) (pow (sin b) 3))))) (pow (cos b) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 4 (pow (cos b) 6)) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (cos b) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (pow (cos b) 6)))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* 4 (* (pow a 2) (pow (cos b) 6))))) (pow (cos b) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* (pow a 2) (+ (* -47/15 (* (pow a 2) (pow (cos b) 6))) (* 4 (pow (cos b) 6)))))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (* (pow (cos b) 2) (pow (sin b) 4)))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* a (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 2 (* (cos b) (* (pow (sin b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* (cos b) (* (sin b) (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (sin b) 2) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* a (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* -2 (* a (pow (cos b) 4))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* a (+ (* -2 (pow (cos b) 4)) (* a (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* a (* (pow (cos b) 3) (sin b))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (- (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* -1 (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (+ (* 1/3 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))) (pow (sin b) 4))) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (* (pow (cos b) 3) (sin b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (+ (* a (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow (sin a) 3)))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) a)))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a)))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) a)))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* a (- (+ (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (* (pow (cos a) 6) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (- (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* 1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* 1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* 1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) 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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (- (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* 1/2 (/ (* r (sin b)) (cos b)))) a)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (- (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (* 1/2 (/ (* r (sin b)) (cos b)))) a)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (- (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))) (* 1/2 (/ (* r (sin b)) (cos b)))) a)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))) a)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))) a))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) a))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (* a (+ (* -1 (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (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 b #s(hole binary64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin 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 a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (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 (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (* 1/2 (* (pow a 2) r))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* a (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (* (pow a 2) (- r (* -1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* 1/3 r) (+ (* a (* b (+ (* -1 (* (pow a 2) (- (+ (* -1/3 r) (+ (* -1/6 r) (+ (* 1/12 r) (* 1/9 r)))) (+ r (* 1/4 r))))) (* 2/3 r)))) (* (pow a 2) (- r (* -1/6 r)))))))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* (pow a 3) (* b (- (/ r (pow a 3)) (* -1/2 (/ r a)))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* b (+ (* (pow a 3) (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2))))) (* (pow a 3) (- (/ r (pow a 3)) (* -1/2 (/ r a))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* b (+ (* b (+ (* (pow a 3) (* b (- (+ (* 1/3 (/ r (pow a 3))) (/ r a)) (* -1/6 (/ r a))))) (* (pow a 3) (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))))) (* (pow a 3) (- (/ r (pow a 3)) (* -1/2 (/ r a))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* (pow a 3) (* b (- (+ (* -1 (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))) (* -1/3 (/ r (pow a 2)))) (* -1 (/ r (pow a 2)))))) (* (pow a 3) (- (+ (* 1/3 (/ r (pow a 3))) (/ r a)) (* -1/6 (/ r a)))))) (* (pow a 3) (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))))) (* (pow a 3) (- (/ r (pow a 3)) (* -1/2 (/ r a))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (/ r (pow a 3)) (* -1/2 (/ r a))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))) (/ r (pow a 3))) (* -1/2 (/ r a))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (- (+ (* 1/3 (/ r (pow a 3))) (/ r a)) (* -1/6 (/ r a)))) (/ r (pow a 2))))) (/ r (pow a 3))) (* -1/2 (/ r a))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) #s(hole binary64 (* b (- (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (- (+ (* 1/3 (/ r (pow a 3))) (+ (* b (- (+ (* -1 (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))) (* -1/3 (/ r (pow a 2)))) (* -1 (/ r (pow a 2))))) (/ r a))) (* -1/6 (/ r a)))) (/ r (pow a 2))))) (/ r (pow a 3))) (* -1/2 (/ r a))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (/ (* b r) (pow a 3))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* b (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (/ r (pow a 2)))) (/ r (pow a 3))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* b (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (+ (* 1/3 (/ r (pow a 3))) (/ r a))) (/ r (pow a 2))))) (/ r (pow a 3))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) #s(hole binary64 (* b (+ (* b (+ (* -1 (+ (* -1 r) (* 1/6 r))) (+ (* b (+ (* 1/3 (/ r (pow a 3))) (+ (* b (- (+ (* -1 (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))) (* -1/3 (/ r (pow a 2)))) (* -1 (/ r (pow a 2))))) (/ r a)))) (/ r (pow a 2))))) (/ r (pow a 3))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r)))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (* 7/8 r)))))))) (+ (* -1/2 (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* 13/120 r)))))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))))) (+ r (* 1/4 r)))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* -1/3 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* 2/45 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* (pow b 2) (+ (* -1/315 (* (pow b 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* 1/6 r)))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* 1/6 (- (* -1/3 r) (* -1 r))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (* 7/8 r))))))) (+ (* -1/2 (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* 13/120 r))))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r)))))))) (+ r (* 1/4 r)))))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r))))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* 7/8 r)))))) (+ (* -1/2 (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))) (+ (* 1/1440 r) (+ (* 1/24 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* 13/120 r)))))))))) (+ (* -1/2 r) (+ (* -1/2 (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) (+ r (* 1/4 r)))) (* -1/48 r))))))) (+ r (* 1/4 r))))))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/12 r)) r))))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* -1/240 r)))) (* -1/2 r))))) r))))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (+ (* 1/12 r) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/6 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (+ (* -1/240 r) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* -1/6 (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r))) (+ (* 1/10080 r) (+ (* 1/120 (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r)) (* 7/8 r)))))) (* 13/120 r))))))) (* -1/2 r))))) r))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (* -1/2 (- (* -1/6 r) (* -1/2 r))) r))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (- (+ (* -3/2 r) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))) r))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (- (+ (* -3/2 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (* (pow b 2) (- (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (* 7/8 r))) (* 13/120 r))))) (* -1/2 r)))) r))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b r)))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (+ (* 1/120 r) (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (* -1/2 r) (* -3/2 r)))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (+ (* 13/120 r) (* (pow b 2) (- (* -41/3024 r) (+ (* -3/2 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/2 r) (* -3/2 r)))))))) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* -1/2 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* 13/120 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) r)) (* 13/120 r)))))))))
#s(approx (pow (cos b) 3) #s(hole binary64 1))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (/ (* b r) (pow a 3))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* b (+ (/ r (pow a 3)) (/ (* b r) (pow a 2))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* 1/3 (/ r (pow a 3))) (/ r a))) (/ r (pow a 2)))) (/ r (pow a 3))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* 1/3 (/ r (pow a 3))) (+ (* b (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (/ r a)))) (/ r (pow a 2)))) (/ r (pow a 3))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (/ (* (pow b 2) r) (pow a 2))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* (pow b 2) (+ (/ r (pow a 2)) (/ (* b r) a)))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* b (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (/ r a))) (/ r (pow a 2))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* b (- (+ (* -1/3 (/ r (pow a 2))) (/ (* b r) a)) (* -1 (/ r (pow a 2))))) (/ r a))) (/ r (pow a 2))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (/ (* (pow b 2) r) (pow a 2))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (/ r (pow a 2))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (- (+ (* -1/3 (/ r (pow a 2))) (* (pow b 2) (- (* 2/45 (/ r (pow a 2))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/3 (/ r (pow a 2))))))) (* -1 (/ r (pow a 2))))) (/ r (pow a 2))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (- (+ (* -1/3 (/ r (pow a 2))) (* (pow b 2) (- (+ (* 2/45 (/ r (pow a 2))) (* (pow b 2) (- (* -1/315 (/ r (pow a 2))) (+ (* -1 (- (* 2/45 (/ r (pow a 2))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/3 (/ r (pow a 2)))))) (+ (* -2/45 (/ r (pow a 2))) (* 1/3 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2)))))))))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/3 (/ r (pow a 2))))))) (* -1 (/ r (pow a 2))))) (/ r (pow a 2))))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow b 2))) (pow a 2))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow a 2)) (* 1/3 (* (pow a 2) (pow b 2))))) (pow a 2))))
#s(approx (pow (* a (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow a 2)) (* (pow b 2) (+ (* -2/45 (* (pow a 2) (pow b 2))) (* 1/3 (pow a 2)))))) (pow a 2))))
#s(approx (* a (cos b)) #s(hole binary64 a))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (/ (* (pow b 3) r) a)))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ (/ r a) (/ (* (pow b 2) r) a)))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* 11/15 (/ (* (pow b 2) r) a)) (/ r a))) (/ r a)))))
#s(approx (* (/ r a) (pow (tan b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 88/189 (/ (* (pow b 2) r) a)) (* 11/15 (/ r a)))) (/ r a))) (/ r a)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (pow b 2)))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* 11/15 (pow b 2))))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (+ 1 (* (pow b 2) (+ 11/15 (* 88/189 (pow b 2))))))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* -1/2 (/ (* b r) a))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* b (+ (* -1/2 (/ r a)) (* -1/6 (/ (* (pow b 2) r) a))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* b (+ (* -1/2 (/ r a)) (* (pow b 2) (+ (* -1/6 (/ r a)) (* -1/15 (/ (* (pow b 2) r) a))))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) #s(hole binary64 (* b (+ (* -1/2 (/ r a)) (* (pow b 2) (+ (* -1/6 (/ r a)) (* (pow b 2) (+ (* -1/15 (/ r a)) (* -17/630 (/ (* (pow b 2) r) a))))))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* b r) a)))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) r) a)) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) r) a)) (* 1/3 (/ r a)))) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ r a)) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) r) a)) (* 2/15 (/ r a)))))) (/ r a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (* (pow a 2) (- (* -1 r) (* -3/2 r)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (+ (* a (* b r)) (* (pow a 2) (- (* -1 r) (* -3/2 r))))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (+ (* b (+ (* a r) (* b (- (+ (* -1/6 r) (* (pow a 2) (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -1/2 r))))) (* (pow a 2) (- (* -1 r) (* -3/2 r))))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ r (+ (* b (+ (* a r) (* b (- (+ (* -1/6 r) (+ (* a (* b (- (* -1/3 r) (* -1 r)))) (* (pow a 2) (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r)))))) (* -1/2 r))))) (* (pow a 2) (- (* -1 r) (* -3/2 r))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* a (* b (- (* -1 r) (* -3/2 r))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* a (- (* -1 r) (* -3/2 r))) (* b r)))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* a (- (* -1 r) (* -3/2 r))) (* b (+ r (* a (* b (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r)))))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* a (- (* -1 r) (* -3/2 r))) (* b (+ r (* b (+ (* a (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r)))) (* b (- (* -1/3 r) (* -1 r)))))))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (* -1 r) (* -3/2 r)))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (+ (* -1 r) (* (pow b 2) (- (* 13/6 r) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -3/2 r)))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (* -121/120 r) (+ (* -3/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))))) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -3/2 r)))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (- (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (+ (* -121/120 r) (* (pow b 2) (- (* 1093/5040 r) (+ (* -3/2 (- (* -121/120 r) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))) (+ (* -3/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r))))))) (+ (* 61/240 r) (* 7/8 (- (* 13/6 r) (* 3/2 r))))))))) (+ (* -3/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))))) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* 3/2 r))))) (* -3/2 r)))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* -1 (* b r))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (- (* 13/6 r) (* 3/2 r)))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (* -121/120 r) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r))))) (* 3/2 r)))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (- (+ (* 13/6 r) (* (pow b 2) (- (+ (* -121/120 r) (* (pow b 2) (- (* 1093/5040 r) (+ (* -3/2 (- (* -121/120 r) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r)))) (+ (* 61/240 r) (* 7/8 (- (* 13/6 r) (* 3/2 r)))))))) (+ (* -3/2 (- (* 13/6 r) (* 3/2 r))) (* -7/8 r))))) (* 3/2 r)))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* -1 (* b r))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* b (+ (* -1 r) (* 13/6 (* (pow b 2) r))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (+ (* -121/120 (* (pow b 2) r)) (* 13/6 r)))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) #s(hole binary64 (* b (+ (* -1 r) (* (pow b 2) (+ (* 13/6 r) (* (pow b 2) (+ (* -121/120 r) (* 1093/5040 (* (pow b 2) r))))))))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* -1 b)))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* b (- (* 13/6 (pow b 2)) 1))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* b (- (* (pow b 2) (+ 13/6 (* -121/120 (pow b 2)))) 1))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* b (- (* (pow b 2) (+ 13/6 (* (pow b 2) (- (* 1093/5040 (pow b 2)) 121/120)))) 1))))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 -1))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (- (* 2 (pow b 2)) 1)))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (- (* (pow b 2) (+ 2 (* -2/3 (pow b 2)))) 1)))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (- (* (pow b 2) (+ 2 (* (pow b 2) (- (* 4/45 (pow b 2)) 2/3)))) 1)))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -3/2 (* b r))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -3/2 r) (* -3/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -3/2 r) (* (pow b 2) (+ (* -3/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -3/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -3/2 r) (* (pow b 2) (+ (* -3/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -3/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -3/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (/ (* r (pow (sin a) 3)) (pow (cos a) 4)) (+ (* -1 (/ (* (sin a) (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7))))) (pow (cos a) 9)) (/ (* r (+ (* -1 (* (pow (cos a) 4) (pow (sin a) 3))) (+ (* 3/2 (* (pow (cos a) 6) (sin a))) (* (pow (cos a) 3) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))))) (pow (cos a) 8)))))) (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 10/3 (/ 1 (cos a))) (* b (- (+ (* -1 (/ (sin a) (pow (cos a) 2))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (+ (* -1/6 (/ (sin a) (pow (cos a) 2))) (/ (pow (sin a) 3) (pow (cos a) 4))))) (+ (* -1 (/ (* (sin a) (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (+ (* 2 (/ (pow (sin a) 3) (pow (cos a) 4))) (/ (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 9))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (* -3/2 (cos a))) (* -3 (cos a)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (+ (* -3/2 (cos a)) (* b (- (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* 3/2 (sin a)) (* 2 (/ (pow (sin a) 3) (pow (cos a) 2))))) (+ (* -1 (sin a)) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (+ (* 3 (sin a)) (/ (pow (sin a) 3) (pow (cos a) 2)))))))))) (* -3 (cos a)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -3 (pow (cos a) 2)) (* b (- (+ (* -1 (* (cos a) (sin a))) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (/ (pow (sin a) 3) (cos a)))) (+ (* -2 (* (cos a) (sin a))) (+ (* -1 (/ (* (sin a) (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (* 2 (/ (pow (sin a) 3) (cos a)))))))) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos a) 6)))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (* (pow (cos a) 3) (pow (sin a) 3))))) (pow (cos a) 6))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 4 (pow (cos a) 6)) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3)))))) (pow (cos a) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (pow (cos a) 6)))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* 4 (* (pow b 2) (pow (cos a) 6))))) (pow (cos a) 6))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* (pow b 2) (+ (* -47/15 (* (pow b 2) (pow (cos a) 6))) (* 4 (pow (cos a) 6)))))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (* (pow (cos a) 2) (pow (sin a) 4)))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* b (+ (* -1/3 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 2 (* (pow (cos a) 2) (* (pow (sin a) 3) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* (cos a) (* (sin a) (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (sin a) 2) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* b (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* -2 (* b (pow (cos a) 4))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* b (+ (* -2 (pow (cos a) 4)) (* b (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* b (* (pow (cos a) 3) (sin a))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (- (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* 1/3 (* (cos a) (sin a))) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a)))))))))) (pow (sin a) 4))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (* (pow (cos a) 3) (sin a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (* (pow (cos a) 2) (pow (sin a) 2))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin 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 (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow (sin b) 3)))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) #s(hole binary64 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) #s(hole binary64 (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) #s(hole binary64 (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) #s(hole binary64 (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) #s(hole binary64 (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) #s(hole binary64 (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) #s(hole binary64 (+ (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))) (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3))))))
#s(approx (pow (tan b) 3) #s(hole binary64 (/ (pow (sin b) 3) (pow (cos b) 3))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) #s(hole binary64 (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(hole binary64 (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))

Outputs
(.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 (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))))))))
r
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(sin.f64 b)
b
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a 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)))
(.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64)))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
a
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
#s(literal 3 binary64)
(.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (sin.f64 a))
(*.f64 (sin.f64 a) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 3 binary64)))
(sin.f64 a)
(*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (sin.f64 b))
(*.f64 (sin.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 3 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
(.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))
(.f64 (.f64 a a) a)
(.f64 a (.f64 a a))
(pow.f64 a #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64)))
(-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (-.f64 (.f64 (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
(+.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
#s(literal -1 binary64)
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (-.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))
(+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(*.f64 (sin.f64 b) (sin.f64 b))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 (cos.f64 b) (cos.f64 b))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (-.f64 (.f64 (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))) (.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))
(fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))
(+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))
#s(literal 1/6 binary64)
(/.f64 (neg.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (neg.f64 (cos.f64 b)))
(/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))
(.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
(-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))
(/.f64 (neg.f64 (*.f64 r (sin.f64 b))) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))
(*.f64 r (sin.f64 b))
(/.f64 (neg.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (cos.f64 b))
(*.f64 (cos.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 3 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (-.f64 (.f64 (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (.f64 (.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))))
(fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
(+.f64 (.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
(/.f64 (neg.f64 r) (neg.f64 (pow.f64 a #s(literal 3 binary64))))
(/.f64 r (pow.f64 a #s(literal 3 binary64)))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64)) (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (.f64 (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
(fma.f64 (/.f64 r (.f64 a a)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
(+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
(.f64 (/.f64 r (.f64 a a)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (neg.f64 (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))))
(/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64)))
(.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(.f64 (.f64 a (cos.f64 b)) (*.f64 a (cos.f64 b)))
(pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 a (cos.f64 b))) #s(literal 2 binary64)))
(*.f64 a (cos.f64 b))
(*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))
(/.f64 (neg.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (neg.f64 (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
(/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (neg.f64 r) (neg.f64 a))
(/.f64 r a)
(*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))
(*.f64 (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(pow.f64 (tan.f64 b) #s(literal 3 binary64))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (tan.f64 b)) #s(literal 3 binary64)))
(.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))
(*.f64 (/.f64 r a) (tan.f64 b))
(/.f64 (neg.f64 (.f64 r (sin.f64 b))) (neg.f64 (.f64 a (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) (.f64 a (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
(/.f64 (+.f64 (pow.f64 (.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (.f64 (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (.f64 (.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))))
(fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))
(+.f64 (.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
(/.f64 (+.f64 (pow.f64 (.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (-.f64 (.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 (.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
(fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(+.f64 (.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
(/.f64 (neg.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))
#s(literal -3/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 (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 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a 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)))
(.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (-.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))
(fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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 4 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))
(.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(.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 4 binary64)))
(pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64))
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)))
(.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))))
(.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 2 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(.f64 (+.f64 (pow.f64 (.f64 (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)))) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)))
(pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) #s(literal 3 binary64)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.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 4 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))))
(fma.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (fabs.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (fabs.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (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 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(.f64 (fabs.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (fabs.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(.f64 (+.f64 (pow.f64 (.f64 (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 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))
(.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (.f64 b b) (.f64 a b))))
(+.f64 a b)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
#s(approx r r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 r (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b))))) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b)))) (+.f64 (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (+.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b)))) (+.f64 (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (+.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (.f64 a (cos.f64 b)))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (.f64 r (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b)))) (+.f64 (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (+.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* r (pow (sin b) 2)) (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) (.f64 r (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (cos.f64 b)))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (/.f64 (.f64 r (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (.f64 r (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (.f64 r (-.f64 (.f64 #s(literal -1/2 binary64) (tan.f64 b)) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos b)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* r (pow (sin b) 3)) (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (.f64 r (+.f64 (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (+.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))))
#s(approx (/ r (pow a 3)) (/.f64 r (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (.f64 r (+.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))))
#s(approx (* (/ r a) (pow (tan b) 3)) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
#s(approx (/ r a) (/.f64 r a))
#s(approx (* -1/2 (* (/ r a) (tan b))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))
#s(approx (* (/ r a) (tan b)) (*.f64 (/.f64 r a) (tan.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 r (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 r (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (.f64 r (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b)))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 (/.f64 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)))) (/.f64 (.f64 (sin.f64 b) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.f64 r (sin.f64 b)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (tan.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (tan.f64 b))))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 b) (.f64 a (cos.f64 b)))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (cos.f64 b))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (.f64 #s(literal -1 binary64) (.f64 r (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (tan.f64 b)) (.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 3 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (tan.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 3/2 binary64) (tan.f64 b))))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal 3/2 binary64) (tan.f64 b))))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 3/2 binary64) (tan.f64 b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 a a))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 a a)) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 a a)))) #s(literal 1/2 binary64)))))
#s(approx a a)
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (sin a) 3) (pow.f64 a #s(literal 3 binary64)))
#s(approx (pow (sin a) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
#s(approx (pow (sin a) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 13/120 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))))
#s(approx (pow (sin a) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 13/120 binary64) (.f64 #s(literal -41/3024 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))
#s(approx (sin a) a)
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 a a)))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 a a)))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 a a) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/144 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/240 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (pow a 3) (pow.f64 a #s(literal 3 binary64)))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (/.f64 (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (/.f64 (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (/.f64 (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (/.f64 (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (/.f64 (fma.f64 a (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (/.f64 (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/.f64 (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/.f64 (fma.f64 a (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/.f64 (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 a a)))
#s(approx (pow (* a (cos b)) 2) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)))
#s(approx (* a (cos b)) (*.f64 a (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)) (.f64 a (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 3/2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64))) (/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -3 binary64) (tan.f64 b)) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3 binary64) (tan.f64 b) (.f64 a (-.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -3 binary64) (tan.f64 b)) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 3/2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64))) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 b) (.f64 #s(literal -3/2 binary64) (cos.f64 b))) (.f64 #s(literal -3 binary64) (cos.f64 b))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 b) (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 3/2 binary64) (sin.f64 b) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (fma.f64 #s(literal 3 binary64) (sin.f64 b) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -3 binary64) (cos.f64 b))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b))))) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (cos.f64 b)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)))))))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 a (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 a (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 #s(literal 4 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -47/15 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 5 binary64))) (fma.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 5 binary64))) (fma.f64 a (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (pow (* (sin a) (sin b)) 2) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/315 binary64) (pow.f64 (.f64 a (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (.f64 #s(literal -2 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (.f64 a (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (.f64 a (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))))) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 #s(literal -1 binary64) (.f64 a (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 a (-.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 a a) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 a (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 a a) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 a a) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 a (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (fma.f64 a (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/6 binary64) (.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.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)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin 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 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (-.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))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (sin a) 3) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))
#s(approx (sin a) (sin.f64 a))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/.f64 (fma.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) a))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/.f64 (fma.f64 (/.f64 r (.f64 a a)) (tan.f64 b) (fma.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) a))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/.f64 (fma.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) a))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 (.f64 a a) (-.f64 (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 (.f64 a a) (-.f64 (fma.f64 (/.f64 r (.f64 a a)) (tan.f64 b) (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 a (-.f64 (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin 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)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 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 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (-.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))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (pow (* (sin a) (sin b)) 2) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (tan.f64 b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b)))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (tan.f64 b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) a))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) a))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) a))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) a)))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) a)))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) a)))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (tan.f64 b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (sin b) b)
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx b b)
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (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 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 b (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 b b))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 b b)))) #s(literal 1/2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (sin b) 3) (pow.f64 b #s(literal 3 binary64)))
#s(approx (pow (sin b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (pow (sin b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 13/120 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))))
#s(approx (pow (sin b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 13/120 binary64) (.f64 #s(literal -41/3024 binary64) (*.f64 b b)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) (sin.f64 a)) (.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.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 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r)))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 a (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r)))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 b (fma.f64 a (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))) (.f64 b (fma.f64 #s(literal 1/3 binary64) r (.f64 (.f64 a a) (-.f64 r (.f64 #s(literal -1/6 binary64) r)))))))))))
#s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 b (fma.f64 a (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))) (.f64 b (fma.f64 #s(literal 1/3 binary64) r (fma.f64 a (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (fma.f64 #s(literal -1/6 binary64) r (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/9 binary64) r)))) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))) (.f64 #s(literal 2/3 binary64) r))) (.f64 (.f64 a a) (-.f64 r (.f64 #s(literal -1/6 binary64) r))))))))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 b (-.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r a))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 b (fma.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (/.f64 r (.f64 a a)))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r a)))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 b (fma.f64 b (fma.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 b (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (/.f64 r a)) (.f64 #s(literal -1/6 binary64) (/.f64 r a)))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (/.f64 r (.f64 a a))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r a)))))))
#s(approx (* (pow a 3) (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b))))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a)))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (/.f64 r a)) (.f64 #s(literal -1/6 binary64) (/.f64 r a))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (/.f64 r (.f64 a a))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r a)))))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (.f64 b (-.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r a)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (.f64 b (-.f64 (fma.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (/.f64 r (.f64 a a))) (/.f64 r (pow.f64 a #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r a)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (.f64 b (-.f64 (fma.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (fma.f64 b (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (/.f64 r a)) (.f64 #s(literal -1/6 binary64) (/.f64 r a))) (/.f64 r (.f64 a a)))) (/.f64 r (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r a)))))
#s(approx (- (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (* -1/2 (* (/ r a) (tan b)))) (.f64 b (-.f64 (fma.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (fma.f64 b (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a)))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r a))) (.f64 #s(literal -1/6 binary64) (/.f64 r a))) (/.f64 r (.f64 a a)))) (/.f64 r (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 r a)))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (/.f64 (*.f64 b r) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (/.f64 r (*.f64 a a))) (/.f64 r (pow.f64 a #s(literal 3 binary64))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (fma.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (/.f64 r a)) (/.f64 r (*.f64 a a)))) (/.f64 r (pow.f64 a #s(literal 3 binary64))))))
#s(approx (+ (* -1 (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))))) (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))))) (.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r)) (fma.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a)))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r a))) (/.f64 r (*.f64 a a)))) (/.f64 r (pow.f64 a #s(literal 3 binary64))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal -1/240 binary64) r (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))))))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal -1/240 binary64) r (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/10080 binary64) r (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (.f64 #s(literal 7/8 binary64) r)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (.f64 #s(literal -1/240 binary64) r)))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))) (fma.f64 #s(literal 1/1440 binary64) r (fma.f64 #s(literal 1/24 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal 13/120 binary64) r)))))))))))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))))) (+.f64 r (*.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (.f64 (.f64 b b) r))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2/45 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/315 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (.f64 #s(literal -1 binary64) r))))))
#s(approx (* r (pow (sin b) 2)) (.f64 (.f64 b b) r))
#s(approx (* r (pow (sin b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal -1/3 binary64) (.f64 (*.f64 b b) r)))))
#s(approx (* r (pow (sin b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 2/45 binary64) (.f64 (*.f64 b b) r)))))))
#s(approx (* r (pow (sin b) 2)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 2/45 binary64) r))))))))
#s(approx (pow (sin b) 2) (*.f64 b b))
#s(approx (pow (sin b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 b b)))))
#s(approx (pow (sin b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 b b)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (.f64 b b)))) #s(literal 1/3 binary64))))))
#s(approx (pow (cos b) 2) #s(literal 1 binary64))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 b b))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 b b)) #s(literal 1 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 b b)))) #s(literal 1 binary64)))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/6 binary64) r))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal -1/240 binary64) r (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))))))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal 1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal -1/240 binary64) r (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/10080 binary64) r (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (.f64 #s(literal 7/8 binary64) r))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (.f64 #s(literal -1/240 binary64) r)))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))) (fma.f64 #s(literal 1/1440 binary64) r (fma.f64 #s(literal 1/24 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal 13/120 binary64) r))))))))))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))))))) (+.f64 r (*.f64 #s(literal 1/4 binary64) r))))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (.f64 #s(literal -1/240 binary64) r)))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))) (+.f64 r (.f64 #s(literal 1/4 binary64) r)))))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal -1/240 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/10080 binary64) r (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (.f64 #s(literal 7/8 binary64) r)))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (.f64 #s(literal -1/240 binary64) r)))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r)))) (fma.f64 #s(literal 1/1440 binary64) r (fma.f64 #s(literal 1/24 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal 13/120 binary64) r)))))))))) (fma.f64 #s(literal -1/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/12 binary64) r)) (+.f64 r (.f64 #s(literal 1/4 binary64) r))) (.f64 #s(literal -1/48 binary64) r))))))) (+.f64 r (*.f64 #s(literal 1/4 binary64) r)))))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/12 binary64) r)) r)))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (.f64 #s(literal -1/240 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r))))) r)))))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/12 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (fma.f64 #s(literal -1/240 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal -1/2 binary64) r)) (fma.f64 #s(literal 1/10080 binary64) r (fma.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r) (.f64 #s(literal 7/8 binary64) r)))))) (.f64 #s(literal 13/120 binary64) r))))))) (*.f64 #s(literal -1/2 binary64) r))))) r)))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (.f64 #s(literal -1/2 binary64) (.f64 b r)))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))) r)))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r)))) r)))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))) (.f64 #s(literal 7/8 binary64) r))) (.f64 #s(literal 13/120 binary64) r))))) (.f64 #s(literal -1/2 binary64) r)))) r)))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (.f64 #s(literal -1/2 binary64) (.f64 b r)))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))))))))))
#s(approx (/ (* r (sin b)) (cos b)) (*.f64 b r))
#s(approx (/ (* r (sin b)) (cos b)) (.f64 b (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* r (sin b)) (cos b)) (.f64 b (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* r (sin b)) (cos b)) (.f64 b (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 1/120 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (*.f64 (pow.f64 b #s(literal 3 binary64)) r))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -3/2 binary64) r))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 13/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r))))) (.f64 #s(literal -3/2 binary64) r))))))
#s(approx (/ (* r (pow (sin b) 3)) (pow (cos b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 13/120 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -41/3024 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r))) (fma.f64 #s(literal -61/240 binary64) r (.f64 #s(literal 7/8 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r))))) (*.f64 #s(literal -3/2 binary64) r))))))
#s(approx (* r (pow (sin b) 3)) (*.f64 (pow.f64 b #s(literal 3 binary64)) r))
#s(approx (* r (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* r (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal 13/120 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* r (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 13/120 binary64) r))))))))
#s(approx (pow (cos b) 3) #s(literal 1 binary64))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -3/2 binary64) (.f64 b b))))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 b b)) #s(literal 3/2 binary64)))))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (.f64 b b)))) #s(literal 3/2 binary64)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (/.f64 (*.f64 b r) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (.f64 b (+.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (/.f64 (.f64 b r) (*.f64 a a)))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (/.f64 r a)) (/.f64 r (.f64 a a))) (/.f64 r (pow.f64 a #s(literal 3 binary64))))))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (fma.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r a))) (/.f64 r (.f64 a a))) (/.f64 r (pow.f64 a #s(literal 3 binary64))))))
#s(approx (tan b) b)
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 2/15 binary64) (*.f64 b b)))))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 2/15 binary64) (.f64 #s(literal 17/315 binary64) (*.f64 b b)))))))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (/.f64 (.f64 (.f64 b b) r) (*.f64 a a)))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (.f64 (.f64 b b) (+.f64 (/.f64 r (.f64 a a)) (/.f64 (.f64 b r) a))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (.f64 (.f64 b b) (fma.f64 b (fma.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r a)) (/.f64 r (*.f64 a a)))))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (.f64 (.f64 b b) (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a)) (/.f64 (.f64 b r) a)) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r a)) (/.f64 r (*.f64 a a)))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (/.f64 (.f64 (.f64 b b) r) (*.f64 a a)))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r (.f64 a a)))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a)) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 r (.f64 a a))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (.f64 #s(literal 1/3 binary64) (/.f64 r (.f64 a a))))))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r (*.f64 a a)))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 r (.f64 a a)) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/315 binary64) (/.f64 r (.f64 a a))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 r (.f64 a a))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (.f64 #s(literal 1/3 binary64) (/.f64 r (.f64 a a))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 r (.f64 a a)) (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 r (.f64 a a))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (.f64 #s(literal 1/3 binary64) (/.f64 r (.f64 a a))))))) (.f64 #s(literal -1 binary64) (/.f64 r (.f64 a a)))) (/.f64 r (.f64 a a)))))
#s(approx (pow (* a (cos b)) 2) (*.f64 a a))
#s(approx (pow (* a (cos b)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 a b) #s(literal 2 binary64)) (.f64 a a)))
#s(approx (pow (* a (cos b)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a a) (.f64 #s(literal 1/3 binary64) (pow.f64 (.f64 a b) #s(literal 2 binary64)))) (*.f64 a a)))
#s(approx (pow (* a (cos b)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (.f64 a b) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 a a))))) (.f64 a a)))
#s(approx (* a (cos b)) a)
#s(approx (* a (cos b)) (+.f64 a (.f64 #s(literal -1/2 binary64) (.f64 a (*.f64 b b)))))
#s(approx (* a (cos b)) (+.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) a (.f64 #s(literal 1/24 binary64) (.f64 a (*.f64 b b)))))))
#s(approx (* a (cos b)) (+.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) a (.f64 (.f64 b b) (fma.f64 #s(literal -1/720 binary64) (.f64 a (.f64 b b)) (*.f64 #s(literal 1/24 binary64) a)))))))
#s(approx (* (/ r a) (pow (tan b) 3)) (/.f64 (*.f64 (pow.f64 b #s(literal 3 binary64)) r) a))
#s(approx (* (/ r a) (pow (tan b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (/.f64 (+.f64 r (.f64 (*.f64 b b) r)) a)))
#s(approx (* (/ r a) (pow (tan b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal 11/15 binary64) (/.f64 (.f64 (.f64 b b) r) a) (/.f64 r a)) (/.f64 r a))))
#s(approx (* (/ r a) (pow (tan b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal 88/189 binary64) (/.f64 (.f64 (.f64 b b) r) a) (.f64 #s(literal 11/15 binary64) (/.f64 r a))) (/.f64 r a)) (/.f64 r a))))
#s(approx (pow (tan b) 3) (pow.f64 b #s(literal 3 binary64)))
#s(approx (pow (tan b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 b b))))
#s(approx (pow (tan b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 11/15 binary64) (*.f64 b b)))))))
#s(approx (pow (tan b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 11/15 binary64) (.f64 #s(literal 88/189 binary64) (*.f64 b b)))))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b r) a)))
#s(approx (* -1/2 (* (/ r a) (tan b))) (.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 r a) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 b b) r) a)))))
#s(approx (* -1/2 (* (/ r a) (tan b))) (.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 r a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (/.f64 r a) (.f64 #s(literal -1/15 binary64) (/.f64 (.f64 (.f64 b b) r) a)))))))
#s(approx (* -1/2 (* (/ r a) (tan b))) (.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 r a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (/.f64 r a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/15 binary64) (/.f64 r a) (.f64 #s(literal -17/630 binary64) (/.f64 (.f64 (.f64 b b) r) a)))))))))
#s(approx (* (/ r a) (tan b)) (/.f64 (*.f64 b r) a))
#s(approx (* (/ r a) (tan b)) (.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 (.f64 (*.f64 b b) r) a) (/.f64 r a))))
#s(approx (* (/ r a) (tan b)) (.f64 b (fma.f64 (.f64 b b) (fma.f64 #s(literal 2/15 binary64) (/.f64 (.f64 (.f64 b b) r) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r a))) (/.f64 r a))))
#s(approx (* (/ r a) (tan b)) (.f64 b (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/3 binary64) (/.f64 r a) (.f64 (.f64 b b) (fma.f64 #s(literal 17/315 binary64) (/.f64 (.f64 (.f64 b b) r) a) (*.f64 #s(literal 2/15 binary64) (/.f64 r a))))) (/.f64 r a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 b (+.f64 r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1 binary64) r) (*.f64 #s(literal -3/2 binary64) r))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 b (+.f64 r (fma.f64 a (.f64 b r) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1 binary64) r) (.f64 #s(literal -3/2 binary64) r)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 b (+.f64 r (fma.f64 b (fma.f64 a r (.f64 b (-.f64 (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 13/6 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 3/2 binary64) r))))) (.f64 #s(literal -1/2 binary64) r)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1 binary64) r) (*.f64 #s(literal -3/2 binary64) r)))))))
#s(approx (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b))) (.f64 b (+.f64 r (fma.f64 b (fma.f64 a r (.f64 b (-.f64 (fma.f64 #s(literal -1/6 binary64) r (fma.f64 a (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 13/6 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 3/2 binary64) r)))))) (.f64 #s(literal -1/2 binary64) r)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1 binary64) r) (.f64 #s(literal -3/2 binary64) r)))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 a (.f64 b (-.f64 (.f64 #s(literal -1 binary64) r) (.f64 #s(literal -3/2 binary64) r)))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 b (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 b r))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 b (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 b (+.f64 r (.f64 a (.f64 b (-.f64 (.f64 #s(literal 13/6 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 3/2 binary64) r))))))))))
#s(approx (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (.f64 b (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 b (+.f64 r (.f64 b (fma.f64 a (-.f64 (.f64 #s(literal 13/6 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 3/2 binary64) r))) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) r) (*.f64 #s(literal -3/2 binary64) r))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 13/6 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 3/2 binary64) r))))) (.f64 #s(literal -3/2 binary64) r))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 13/6 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -121/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r)) (.f64 #s(literal -7/8 binary64) r)))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 3/2 binary64) r))))) (*.f64 #s(literal -3/2 binary64) r))))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 13/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -121/120 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1093/5040 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -121/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r)) (.f64 #s(literal -7/8 binary64) r))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))) (fma.f64 #s(literal 61/240 binary64) r (.f64 #s(literal 7/8 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r))))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r)) (.f64 #s(literal -7/8 binary64) r)))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 3/2 binary64) r))))) (.f64 #s(literal -3/2 binary64) r))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (.f64 #s(literal -1 binary64) (.f64 b r)))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (.f64 b (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 13/6 binary64) r) (*.f64 #s(literal 3/2 binary64) r))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (.f64 b (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 13/6 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -121/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r)) (.f64 #s(literal -7/8 binary64) r))))) (.f64 #s(literal 3/2 binary64) r))))))
#s(approx (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (.f64 b (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 13/6 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -121/120 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1093/5040 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -121/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r)) (.f64 #s(literal -7/8 binary64) r))) (fma.f64 #s(literal 61/240 binary64) r (.f64 #s(literal 7/8 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r)))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/6 binary64) r) (.f64 #s(literal 3/2 binary64) r)) (.f64 #s(literal -7/8 binary64) r))))) (*.f64 #s(literal 3/2 binary64) r))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (.f64 #s(literal -1 binary64) (.f64 b r)))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (.f64 b (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 13/6 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (.f64 b (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -121/120 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 13/6 binary64) r))))))
#s(approx (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (.f64 b (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal 13/6 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -121/120 binary64) r (.f64 #s(literal 1093/5040 binary64) (.f64 (.f64 b b) r)))))))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (*.f64 #s(literal -1 binary64) b))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (.f64 b (-.f64 (.f64 #s(literal 13/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (.f64 b (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 13/6 binary64) (.f64 #s(literal -121/120 binary64) (*.f64 b b)))) #s(literal 1 binary64))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (.f64 b (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 13/6 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1093/5040 binary64) (*.f64 b b)) #s(literal 121/120 binary64))))) #s(literal 1 binary64))))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) #s(literal -1 binary64))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (-.f64 (.f64 #s(literal 2 binary64) (.f64 b b)) #s(literal 1 binary64)))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (.f64 b b)))) #s(literal 1 binary64)))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 4/45 binary64) (.f64 b b)) #s(literal 2/3 binary64))))) #s(literal 1 binary64)))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) (.f64 #s(literal -3/2 binary64) (.f64 b r)))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) (.f64 b (fma.f64 #s(literal -3/2 binary64) r (.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) (.f64 b (fma.f64 #s(literal -3/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))) (.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (* -3/2 (/ (* r (sin b)) (cos b))) (.f64 b (fma.f64 #s(literal -3/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))) (.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (cos.f64 a)) (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal 3/2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (sin.f64 a)) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 10/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal 10/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 10/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (.f64 #s(literal -3/2 binary64) (cos.f64 a))) (.f64 #s(literal -3 binary64) (cos.f64 a))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal 3/2 binary64) (sin.f64 a) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (fma.f64 #s(literal 3 binary64) (sin.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -3 binary64) (cos.f64 a))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 b (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)))) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (cos.f64 a)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)))))))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 b (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (+ (pow (pow (* (cos a) (cos b)) 2) 3) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 b (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal 4 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 2) 3) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -47/15 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 5 binary64))) (fma.f64 (cos.f64 a) (.f64 (sin.f64 a) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 5 binary64))) (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 (cos.f64 a) (.f64 (sin.f64 a) (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 a) (.f64 (sin.f64 a) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (pow (* (sin a) (sin b)) 2) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/315 binary64) (pow.f64 (.f64 b (sin.f64 a)) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 #s(literal -1 binary64) (.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 #s(literal -1 binary64) (.f64 b (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (- (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 b (-.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a))))))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 b b) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 b (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 b b) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (.f64 b b) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 b (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (fma.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/6 binary64) (.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (pow (sin b) 3) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
#s(approx (+ (* -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/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))))
#s(approx (pow (sin b) 2) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))
#s(approx (/ (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (cos b)) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))
#s(approx (* (sin b) (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))) (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))
#s(approx (- (* -1/2 (/ (* r (sin b)) (cos b))) (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (cos b) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (+ (* (/ r (pow a 3)) (tan b)) (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ (/ (* r (pow (sin b) 2)) (pow (* a (cos b)) 2)) (* (/ r a) (pow (tan b) 3))) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (tan b) 3) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))
#s(approx (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b)))) (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))
#s(approx (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))

eval441.0ms (0.7%)

Memory: 14.3MiB live, 577.5MiB allocated; 81ms collecting garbage
Compiler: Compiled 291 574 to 12 763 computations (95.6% saved)

prune25.5s (39.8%)

Memory

106.7MiB live, 23 836.0MiB allocated; 2.9s collecting garbage

Pruning

10 alts after pruning (7 fresh and 3 done)

	Pruned	Kept	Total
New	2 049	6	2 055
Fresh	2	1	3
Picked	4	1	5
Done	1	2	3
Total	2 056	10	2 066

Accuracy

100.0%

Counts

2 066 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.5%	(/.f64 (.f64 (sin.f64 b) r) (-.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 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(approx ( (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))))
	99.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 (+.f64 (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))))
▶	99.4%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶	99.3%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))))
▶	65.6%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶	99.2%	#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
✓	59.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
✓	48.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
✓	18.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))

Compiler

Compiled 1 617 to 563 computations (65.2% saved)

series278.0ms (0.4%)

Memory

2.3MiB live, 283.3MiB allocated; 34ms collecting garbage

Counts

61 → 453

Calls

Call 1

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

Outputs
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin 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) (cos b)) (* (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 (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (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 (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (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 a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#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 (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #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) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* (cos b) (sin b)))) (* (cos b) (sin b))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* 1/120 (* (pow a 2) (* (cos b) (sin b))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* (cos b) (sin b)))) (* 1/120 (* (cos b) (sin b)))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (* 3 (log (cos b)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* -3/2 (pow a 2)) (* 3 (log (cos b))))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos b))) (* (pow a 2) (- (* -1/4 (pow a 2)) 3/2)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos b))) (* (pow a 2) (- (* (pow a 2) (- (* -1/15 (pow a 2)) 1/4)) 3/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (log (cos b))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos b)) (* -1/2 (pow a 2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos b)) (* (pow a 2) (- (* -1/12 (pow a 2)) 1/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos b)) (* (pow a 2) (- (* (pow a 2) (- (* -1/45 (pow a 2)) 1/12)) 1/2)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow a 3)))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* -1/2 (pow a 2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* 13/120 (pow a 2)) 1/2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 13/120 (* -41/3024 (pow a 2)))) 1/2))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (* r (sin b)) (cos b))) (* a (- (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))))) (pow (cos b) 8)) (/ (* r (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 9))))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (sin b) (cos b))) (* a (- (/ (pow (sin b) 4) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))))) (pow (cos b) 8)) (/ (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 9))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (* -3/2 (cos b))) (* -3 (cos b)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (+ (* -3/2 (cos b)) (* a (- (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* 3/2 (sin b)) (* 2 (/ (pow (sin b) 3) (pow (cos b) 2))))) (+ (* -1 (sin b)) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (+ (* 3 (sin b)) (/ (pow (sin b) 3) (pow (cos b) 2)))))))))) (* -3 (cos b)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (pow (cos b) 2)) (* a (- (+ (* -1 (* (cos b) (sin b))) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (/ (pow (sin b) 3) (cos b))))) (+ (* -2 (* (cos b) (sin b))) (+ (* -1 (/ (* (sin b) (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (* 2 (/ (pow (sin b) 3) (cos b)))))))) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos b) 6)))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (* (pow (cos b) 3) (pow (sin b) 3))))) (pow (cos b) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 4 (pow (cos b) 6)) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (pow (cos b) 6)))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* 4 (* (pow a 2) (pow (cos b) 6))))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* (pow a 2) (+ (* -47/15 (* (pow a 2) (pow (cos b) 6))) (* 4 (pow (cos b) 6)))))) (pow (cos b) 6))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (* (pow (cos b) 2) (pow (sin b) 4)))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* a (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 2 (* (cos b) (* (pow (sin b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* (cos b) (* (sin b) (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (sin b) 2) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* a (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* -2 (* a (pow (cos b) 4))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* a (+ (* -2 (pow (cos b) 4)) (* a (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos b) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* a (* (pow (cos b) 3) (sin b))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (- (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* -1 (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (+ (* 1/3 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))) (pow (sin b) 4))) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (* (pow (cos b) 3) (sin b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (+ (* a (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (pow (cos a) 2) #s(hole binary64 1))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* (cos b) (* (sin a) (sin b)))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (* 3 (log (* (cos a) (cos b))))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (log (* (cos a) (cos b)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow (sin a) 3)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (* (pow (cos a) 6) (pow (cos b) 6))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (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) 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) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (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 a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (sin a))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (+ (* 1/12 (sin a)) (* (pow b 2) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (* 3 (log (cos a)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* -3/2 (pow b 2)) (* 3 (log (cos a))))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos a))) (* (pow b 2) (- (* -1/4 (pow b 2)) 3/2)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos a))) (* (pow b 2) (- (* (pow b 2) (- (* -1/15 (pow b 2)) 1/4)) 3/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (log (cos a))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos a)) (* -1/2 (pow b 2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos a)) (* (pow b 2) (- (* -1/12 (pow b 2)) 1/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos a)) (* (pow b 2) (- (* (pow b 2) (- (* -1/45 (pow b 2)) 1/12)) 1/2)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (/ (* r (pow (sin a) 3)) (pow (cos a) 4)) (+ (* -1 (/ (* (sin a) (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7))))) (pow (cos a) 9)) (/ (* r (+ (* -1 (* (pow (cos a) 4) (pow (sin a) 3))) (+ (* 3/2 (* (pow (cos a) 6) (sin a))) (* (pow (cos a) 3) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))))) (pow (cos a) 8)))))) (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 10/3 (/ 1 (cos a))) (* b (- (+ (* -1 (/ (sin a) (pow (cos a) 2))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (+ (* -1/6 (/ (sin a) (pow (cos a) 2))) (/ (pow (sin a) 3) (pow (cos a) 4))))) (+ (* -1 (/ (* (sin a) (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (+ (* 2 (/ (pow (sin a) 3) (pow (cos a) 4))) (/ (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 9))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (* -3/2 (cos a))) (* -3 (cos a)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (+ (* -3/2 (cos a)) (* b (- (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* 3/2 (sin a)) (* 2 (/ (pow (sin a) 3) (pow (cos a) 2))))) (+ (* -1 (sin a)) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (+ (* 3 (sin a)) (/ (pow (sin a) 3) (pow (cos a) 2)))))))))) (* -3 (cos a)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -3 (pow (cos a) 2)) (* b (- (+ (* -1 (* (cos a) (sin a))) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (/ (pow (sin a) 3) (cos a)))) (+ (* -2 (* (cos a) (sin a))) (+ (* -1 (/ (* (sin a) (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (* 2 (/ (pow (sin a) 3) (cos a)))))))) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos a) 6)))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (* (pow (cos a) 3) (pow (sin a) 3))))) (pow (cos a) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 4 (pow (cos a) 6)) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3)))))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (pow (cos a) 6)))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* 4 (* (pow b 2) (pow (cos a) 6))))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* (pow b 2) (+ (* -47/15 (* (pow b 2) (pow (cos a) 6))) (* 4 (pow (cos a) 6)))))) (pow (cos a) 6))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (* (pow (cos a) 2) (pow (sin a) 4)))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* b (+ (* -1/3 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 2 (* (pow (cos a) 2) (* (pow (sin a) 3) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* (cos a) (* (sin a) (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (sin a) 2) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* b (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* -2 (* b (pow (cos a) 4))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* b (+ (* -2 (pow (cos a) 4)) (* b (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos a) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* b (* (pow (cos a) 3) (sin a))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (- (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* 1/3 (* (cos a) (sin a))) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a)))))))))) (pow (sin a) 4))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (* (pow (cos a) 3) (sin a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (* (pow (cos a) 2) (pow (sin a) 2))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow (sin b) 3)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))

Calls

9 calls:

Time	Variable		Point	Expression
100.0ms	a	@	-inf	((/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (sin b) b r (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) 2 (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (* (cos a) (cos b)) 6) 6 (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow (* (cos a) (cos b)) 4) 4 (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow (cos a) 2) (pow (cos b) 2))
37.0ms	a	@	inf	((/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (sin b) b r (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) 2 (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (* (cos a) (cos b)) 6) 6 (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow (* (cos a) (cos b)) 4) 4 (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow (cos a) 2) (pow (cos b) 2))
35.0ms	b	@	inf	((/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (sin b) b r (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) 2 (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (* (cos a) (cos b)) 6) 6 (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow (* (cos a) (cos b)) 4) 4 (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow (cos a) 2) (pow (cos b) 2))
27.0ms	b	@	-inf	((/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (sin b) b r (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) 2 (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (* (cos a) (cos b)) 6) 6 (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow (* (cos a) (cos b)) 4) 4 (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow (cos a) 2) (pow (cos b) 2))
16.0ms	r	@	inf	((/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (sin b) b r (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) 2 (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin a) 3) (pow (sin b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (* (cos a) (cos b)) 6) 6 (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow (* (cos a) (cos b)) 4) 4 (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow (cos a) 2) (pow (cos b) 2))

rewrite268.0ms (0.4%)

Memory

13.7MiB live, 283.2MiB allocated; 28ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2183	28929
0	2338	24958
0	9347	24125

Stop Event

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

Counts

514 → 637

Calls

Call 1

Inputs
(/.f64 (.f64 (sin.f64 b) r) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (sin.f64 b) r)
(sin.f64 b)
b
r
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
a
(cos.f64 b)
(*.f64 (sin.f64 a) (sin.f64 b))
(sin.f64 a)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
#s(literal 2 binary64)
(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)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64)))
(.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))
(log.f64 (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (.f64 (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 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))
(-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64))
#s(literal 6 binary64)
(pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))
(+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))
(pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))
(.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin 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) (cos b)) (* (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 (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (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 (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (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 a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#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 (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #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) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* (cos b) (sin b)))) (* (cos b) (sin b))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* 1/120 (* (pow a 2) (* (cos b) (sin b))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* (cos b) (sin b)))) (* 1/120 (* (cos b) (sin b)))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (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) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (* 3 (log (cos b)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* -3/2 (pow a 2)) (* 3 (log (cos b))))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos b))) (* (pow a 2) (- (* -1/4 (pow a 2)) 3/2)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos b))) (* (pow a 2) (- (* (pow a 2) (- (* -1/15 (pow a 2)) 1/4)) 3/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (log (cos b))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos b)) (* -1/2 (pow a 2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos b)) (* (pow a 2) (- (* -1/12 (pow a 2)) 1/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos b)) (* (pow a 2) (- (* (pow a 2) (- (* -1/45 (pow a 2)) 1/12)) 1/2)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow a 3)))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* -1/2 (pow a 2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* 13/120 (pow a 2)) 1/2))))))
#s(approx (pow (sin a) 3) #s(hole binary64 (* (pow a 3) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 13/120 (* -41/3024 (pow a 2)))) 1/2))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (* r (sin b)) (cos b))) (* a (- (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (* r (sin b)) (cos b))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))))) (pow (cos b) 8)) (/ (* r (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 9))))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7))))) (pow (cos b) 8))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (/ (sin b) (cos b))) (* a (- (/ (pow (sin b) 4) (pow (cos b) 4)) (+ (* -1 (/ (* (sin b) (- (* -3 (/ (sin b) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 4) (pow (sin b) 3))) (+ (* 3/2 (* (pow (cos b) 6) (sin b))) (* (pow (cos b) 3) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))))) (pow (cos b) 8)) (/ (* (pow (sin b) 2) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 9))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -2 (pow (cos b) 7)) (* -3/2 (pow (cos b) 7)))) (pow (cos b) 8))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (* -3/2 (cos b))) (* -3 (cos b)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -2 (cos b)) (+ (* -3/2 (cos b)) (* a (- (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* 3/2 (sin b)) (* 2 (/ (pow (sin b) 3) (pow (cos b) 2))))) (+ (* -1 (sin b)) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (+ (* 3 (sin b)) (/ (pow (sin b) 3) (pow (cos b) 2)))))))))) (* -3 (cos b)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -3 (pow (cos b) 2)) (* a (- (+ (* -1 (* (cos b) (sin b))) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (/ (pow (sin b) 3) (cos b))))) (+ (* -2 (* (cos b) (sin b))) (+ (* -1 (/ (* (sin b) (- (* -3 (pow (cos b) 2)) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (* 2 (/ (pow (sin b) 3) (cos b)))))))) (+ (* -2 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos b) 6)))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (* (pow (cos b) 3) (pow (sin b) 3))))) (pow (cos b) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 4 (pow (cos b) 6)) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (pow (cos b) 6)))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* 4 (* (pow a 2) (pow (cos b) 6))))) (pow (cos b) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* (pow a 2) (+ (* -47/15 (* (pow a 2) (pow (cos b) 6))) (* 4 (pow (cos b) 6)))))) (pow (cos b) 6))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (* (pow (cos b) 2) (pow (sin b) 4)))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow a 3) (+ (* a (+ (* 2 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 5))) (+ (* a (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 4))) (+ (* 2 (* (cos b) (* (pow (sin b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* (cos b) (* (sin b) (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))))) (* (pow (sin b) 2) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))))) (+ (* (cos b) (* (sin b) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* (pow (cos b) 2) (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 2) (pow (sin b) 4))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* a (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* -2 (* a (pow (cos b) 4))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (- (* a (+ (* -2 (pow (cos b) 4)) (* a (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))) (* (pow (cos b) 3) (sin b)))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos b) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* a (* (pow (cos b) 3) (sin b))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (* 2 (* (cos b) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* a (- (* (pow a 2) (- (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (- (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (- (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* -1 (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (+ (* 1/3 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))) (pow (sin b) 4))) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))))) (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 3) (sin b))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (* (pow (cos b) 3) (sin b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1 (* (pow (cos b) 3) (sin b))) (+ (* a (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 3) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (pow (cos a) 2) #s(hole binary64 1))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* (cos b) (* (sin a) (sin b)))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (* 3 (log (* (cos a) (cos b))))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (log (* (cos a) (cos b)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (pow (sin a) 3) #s(hole binary64 (pow (sin a) 3)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ (* (sin b) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))) (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)) (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow (cos a) 6) (pow (cos b) 6)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (* (pow (cos a) 6) (pow (cos b) 6))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 3)))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (- (+ (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2) (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow (cos a) 2) (* (pow (cos b) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (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) 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) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (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 a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (sin a))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (+ (* 1/12 (sin a)) (* (pow b 2) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (* 3 (log (cos a)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* -3/2 (pow b 2)) (* 3 (log (cos a))))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos a))) (* (pow b 2) (- (* -1/4 (pow b 2)) 3/2)))))
#s(approx (* (log (* (cos a) (cos b))) 3) #s(hole binary64 (+ (* 3 (log (cos a))) (* (pow b 2) (- (* (pow b 2) (- (* -1/15 (pow b 2)) 1/4)) 3/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (log (cos a))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos a)) (* -1/2 (pow b 2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos a)) (* (pow b 2) (- (* -1/12 (pow b 2)) 1/2)))))
#s(approx (log (* (cos a) (cos b))) #s(hole binary64 (+ (log (cos a)) (* (pow b 2) (- (* (pow b 2) (- (* -1/45 (pow b 2)) 1/12)) 1/2)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (/ (* r (pow (sin a) 3)) (pow (cos a) 4)) (+ (* -1 (/ (* (sin a) (- (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7))))) (pow (cos a) 9)) (/ (* r (+ (* -1 (* (pow (cos a) 4) (pow (sin a) 3))) (+ (* 3/2 (* (pow (cos a) 6) (sin a))) (* (pow (cos a) 3) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))))) (pow (cos a) 8)))))) (/ (* r (+ (* -3 (pow (cos a) 6)) (* -1/6 (pow (cos a) 6)))) (pow (cos a) 7))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 8))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 10/3 (/ 1 (cos a))) (* b (- (+ (* -1 (/ (sin a) (pow (cos a) 2))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (+ (* -1/6 (/ (sin a) (pow (cos a) 2))) (/ (pow (sin a) 3) (pow (cos a) 4))))) (+ (* -1 (/ (* (sin a) (- (* 10/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (+ (* 2 (/ (pow (sin a) 3) (pow (cos a) 4))) (/ (* (sin a) (+ (* -2 (pow (cos a) 7)) (* -3/2 (pow (cos a) 7)))) (pow (cos a) 9))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 3 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (* -3/2 (cos a))) (* -3 (cos a)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -2 (cos a)) (+ (* -3/2 (cos a)) (* b (- (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* 3/2 (sin a)) (* 2 (/ (pow (sin a) 3) (pow (cos a) 2))))) (+ (* -1 (sin a)) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (+ (* 3 (sin a)) (/ (pow (sin a) 3) (pow (cos a) 2)))))))))) (* -3 (cos a)))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -3 (pow (cos a) 2)) (* b (- (+ (* -1 (* (cos a) (sin a))) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (/ (pow (sin a) 3) (cos a)))) (+ (* -2 (* (cos a) (sin a))) (+ (* -1 (/ (* (sin a) (- (* -3 (pow (cos a) 2)) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (* 2 (/ (pow (sin a) 3) (cos a)))))))) (+ (* -2 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (pow (cos a) 6)))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (* (pow (cos a) 3) (pow (sin a) 3))))) (pow (cos a) 6))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 4 (pow (cos a) 6)) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3)))))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (pow (cos a) 6)))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* 4 (* (pow b 2) (pow (cos a) 6))))) (pow (cos a) 6))))
#s(approx (pow (* (cos a) (cos b)) 6) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* (pow b 2) (+ (* -47/15 (* (pow b 2) (pow (cos a) 6))) (* 4 (pow (cos a) 6)))))) (pow (cos a) 6))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (* (pow (cos a) 2) (pow (sin a) 4)))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) #s(hole binary64 (* (pow b 3) (+ (* b (+ (* 2 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 5))) (+ (* b (+ (* -1/3 (* (pow (cos a) 2) (pow (sin a) 4))) (+ (* 2 (* (pow (cos a) 2) (* (pow (sin a) 3) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* (cos a) (* (sin a) (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (sin a) 2) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))))) (+ (* (cos a) (* (sin a) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* (pow (cos a) 3) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))) (* (pow (cos a) 2) (pow (sin a) 4))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* -1 (* b (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* -2 (* b (pow (cos a) 4))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* b (- (* b (+ (* -2 (pow (cos a) 4)) (* b (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))) (* (pow (cos a) 3) (sin a)))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos a) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* -1 (* b (* (pow (cos a) 3) (sin a))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (* 2 (* (cos a) (pow (sin a) 3))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (* b (- (* (pow b 2) (- (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (- (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* 1/3 (* (cos a) (sin a))) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a)))))))))) (pow (sin a) 4))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 3) (sin a))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (* (pow (cos a) 3) (sin a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (* (pow (cos a) 2) (pow (sin a) 2))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (+ (* -1 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (* (pow (cos a) 3) (sin a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow (sin b) 3)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))

Outputs
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(sin.f64 b)
b
r
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (+.f64 a b))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
a
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(*.f64 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(sin.f64 a)
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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 (neg.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))) (neg.f64 (-.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 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.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 (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 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
(fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(+.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))
(/.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 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (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)) (pow.f64 (.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 (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)) (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (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)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 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 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))))
(.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 2 binary64)))
#s(literal 2 binary64)
(.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.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 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 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 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b)))) #s(literal 3 binary64))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))))
#s(literal 3 binary64)
(.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (+.f64 a b))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.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 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 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 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b)))) #s(literal 3 binary64))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))))
(.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))
(+.f64 (log.f64 (cos.f64 a)) (log.f64 (cos.f64 b)))
(log.f64 (*.f64 (cos.f64 a) (cos.f64 b)))
(.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (sin.f64 a))
(*.f64 (sin.f64 a) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (sin.f64 b))
(*.f64 (sin.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 3 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))) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (.f64 (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 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.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 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))))
(/.f64 (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 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))) (/.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.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 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 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))) (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (-.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 6 binary64)))
#s(literal 6 binary64)
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(.f64 (+.f64 (pow.f64 (.f64 (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)))) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)))
(pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) #s(literal 3 binary64)))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64))) (.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))) (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 4 binary64)))
#s(literal 4 binary64)
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (fma.f64 (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))
(.f64 (+.f64 (pow.f64 (.f64 (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 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (+.f64 a b))
(/.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))) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(*.f64 (cos.f64 b) (cos.f64 b))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.f64 r (sin.f64 b)))
#s(approx r r)
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (.f64 (/.f64 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)))) (/.f64 (.f64 (sin.f64 b) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/6 binary64) (.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 a a))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 a a)) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 a a)))) #s(literal 1/2 binary64)))))
#s(approx a a)
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 a a) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (sin a) a)
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 a a)))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 a a)))) #s(literal 1/6 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (.f64 r (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (.f64 r (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 r (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 r (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 r (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (fma.f64 a (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (.f64 r (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (fma.f64 a (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 b) (sin.f64 b))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 b) (sin.f64 b)))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 b) (sin.f64 b))) (.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (sin a) (sin b)) 2) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/315 binary64) (pow.f64 (.f64 a (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (log (* (cos a) (cos b))) 3) (log.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (log (* (cos a) (cos b))) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 a a) (log.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
#s(approx (* (log (* (cos a) (cos b))) 3) (fma.f64 #s(literal 3 binary64) (log.f64 (cos.f64 b)) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 a a)) #s(literal 3/2 binary64)))))
#s(approx (* (log (* (cos a) (cos b))) 3) (fma.f64 #s(literal 3 binary64) (log.f64 (cos.f64 b)) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/15 binary64) (.f64 a a)) #s(literal 1/4 binary64))) #s(literal 3/2 binary64)))))
#s(approx (log (* (cos a) (cos b))) (log.f64 (cos.f64 b)))
#s(approx (log (* (cos a) (cos b))) (+.f64 (log.f64 (cos.f64 b)) (.f64 #s(literal -1/2 binary64) (.f64 a a))))
#s(approx (log (* (cos a) (cos b))) (+.f64 (log.f64 (cos.f64 b)) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/12 binary64) (.f64 a a)) #s(literal 1/2 binary64)))))
#s(approx (log (* (cos a) (cos b))) (+.f64 (log.f64 (cos.f64 b)) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 a a)) #s(literal 1/12 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (sin a) 3) (pow.f64 a #s(literal 3 binary64)))
#s(approx (pow (sin a) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
#s(approx (pow (sin a) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 13/120 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))))
#s(approx (pow (sin a) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 13/120 binary64) (.f64 #s(literal -41/3024 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/144 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/240 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)) (.f64 a (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -3 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 3/2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64))) (/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -3 binary64) (tan.f64 b)) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3 binary64) (tan.f64 b) (.f64 a (-.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -3 binary64) (tan.f64 b)) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 3/2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64))) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 7 binary64))))) (pow.f64 (cos.f64 b) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 b) (.f64 #s(literal -3/2 binary64) (cos.f64 b))) (.f64 #s(literal -3 binary64) (cos.f64 b))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 b) (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 3/2 binary64) (sin.f64 b) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (fma.f64 #s(literal 3 binary64) (sin.f64 b) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -3 binary64) (cos.f64 b))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b))))) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (cos.f64 b)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)))))))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 a (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 a (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 6) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))
#s(approx (pow (* (cos a) (cos b)) 6) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 6) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 #s(literal 4 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 6) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -47/15 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 5 binary64))) (fma.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 5 binary64))) (fma.f64 a (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (.f64 #s(literal -2 binary64) (.f64 a (pow.f64 (cos.f64 b) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (.f64 a (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (.f64 a (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))))) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 #s(literal -2 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (.f64 #s(literal 5/3 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -34/45 binary64) (.f64 (.f64 a a) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 #s(literal -1 binary64) (.f64 a (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 a (-.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (fma.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 a a) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 a (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 a a) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 a a) (fma.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 a (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 a (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (fma.f64 a (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)) (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (cos a) 2) #s(literal 1 binary64))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a a))))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 a a)) #s(literal 1 binary64)))))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 a a)))) #s(literal 1 binary64)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
#s(approx (pow (* (sin a) (sin b)) 2) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (-.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))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.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)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin 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 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (-.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))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))
#s(approx (* (log (* (cos a) (cos b))) 3) (log.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))))
#s(approx (log (* (cos a) (cos b))) (log.f64 (*.f64 (cos.f64 a) (cos.f64 b))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (sin a) 3) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin 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)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 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 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (-.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))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 6) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 3 binary64)))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
#s(approx (pow (* (cos a) (cos b)) 4) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.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)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin 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 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (pow (cos a) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (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 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (sin b) b)
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx b b)
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/6 binary64) (.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 b b))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 b b)))) #s(literal 1/2 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) (sin.f64 a)) (.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (.f64 b (.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (.f64 b (fma.f64 b (.f64 r (.f64 (cos.f64 a) (sin.f64 a))) (.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (.f64 b (fma.f64 b (fma.f64 b (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (.f64 r (.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 b (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (.f64 r (.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (.f64 b (fma.f64 b (.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (sin.f64 a)))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (fma.f64 #s(literal 1/12 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (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 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (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 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (sin a) (sin b)) 2) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/315 binary64) (pow.f64 (.f64 b (sin.f64 a)) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 b (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (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 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 b (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (exp (* (log (* (cos a) (cos b))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (log (* (cos a) (cos b))) 3) (log.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (log (* (cos a) (cos b))) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 b b) (log.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
#s(approx (* (log (* (cos a) (cos b))) 3) (fma.f64 #s(literal 3 binary64) (log.f64 (cos.f64 a)) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 b b)) #s(literal 3/2 binary64)))))
#s(approx (* (log (* (cos a) (cos b))) 3) (fma.f64 #s(literal 3 binary64) (log.f64 (cos.f64 a)) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/15 binary64) (.f64 b b)) #s(literal 1/4 binary64))) #s(literal 3/2 binary64)))))
#s(approx (log (* (cos a) (cos b))) (log.f64 (cos.f64 a)))
#s(approx (log (* (cos a) (cos b))) (+.f64 (log.f64 (cos.f64 a)) (.f64 #s(literal -1/2 binary64) (.f64 b b))))
#s(approx (log (* (cos a) (cos b))) (+.f64 (log.f64 (cos.f64 a)) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/12 binary64) (.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (log (* (cos a) (cos b))) (+.f64 (log.f64 (cos.f64 a)) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 b b)) #s(literal 1/12 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (sin b) 3) (pow.f64 b #s(literal 3 binary64)))
#s(approx (pow (sin b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (pow (sin b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 13/120 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))))
#s(approx (pow (sin b) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 13/120 binary64) (.f64 #s(literal -41/3024 binary64) (*.f64 b b)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (.f64 (.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (.f64 (.f64 b b) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (cos.f64 a)) (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal 3/2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (sin.f64 a)) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (.f64 r (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 8 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 10/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal 10/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 10/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 7 binary64))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (.f64 #s(literal -3/2 binary64) (cos.f64 a))) (.f64 #s(literal -3 binary64) (cos.f64 a))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (cos.f64 a) (.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal 3/2 binary64) (sin.f64 a) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (fma.f64 #s(literal 3 binary64) (sin.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -3 binary64) (cos.f64 a))))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (sin a) 3) (pow (sin b) 3))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 b (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)))) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (cos.f64 a)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)))))))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 b (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 6) (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 b (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 6) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))
#s(approx (pow (* (cos a) (cos b)) 6) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 6) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 #s(literal 4 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (* (cos a) (cos b)) 6) (fma.f64 (.f64 b b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -47/15 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 5 binary64))) (fma.f64 (cos.f64 a) (.f64 (sin.f64 a) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 5 binary64))) (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 (cos.f64 a) (.f64 (sin.f64 a) (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))))) (fma.f64 (cos.f64 a) (.f64 (sin.f64 a) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 #s(literal -1 binary64) (.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (.f64 #s(literal 5/3 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -34/45 binary64) (.f64 (.f64 b b) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 #s(literal -1 binary64) (.f64 b (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (.f64 b (-.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 b (-.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a))))))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 b b) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 b (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 b b) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (.f64 (.f64 b b) (fma.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 b (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 b (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (fma.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 b (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (pow.f64 (.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (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 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (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 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (cos b) 2) #s(literal 1 binary64))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 b b))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 b b)) #s(literal 1 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 b b)))) #s(literal 1 binary64)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (pow (sin b) 3) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))

eval282.0ms (0.4%)

Memory: 14.8MiB live, 397.0MiB allocated; 40ms collecting garbage
Compiler: Compiled 165 644 to 8 820 computations (94.7% saved)

prune16.4s (25.7%)

Memory

-86.5MiB live, 9 486.0MiB allocated; 1.5s collecting garbage

Pruning

10 alts after pruning (3 fresh and 7 done)

	Pruned	Kept	Total
New	1 682	1	1 683
Fresh	0	2	2
Picked	1	4	5
Done	0	3	3
Total	1 683	10	1 693

Accuracy

100.0%

Counts

1 693 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.5%	(/.f64 (.f64 (sin.f64 b) r) (-.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 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(approx ( (* (cos a) (cos b)) (* (sin a) (sin b))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))))))
	99.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 (+.f64 (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #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)) (-.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))))
✓	99.4%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
	99.3%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) #s(approx (+ (pow (* (cos a) (cos b)) 4) (- (pow (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) 2) (* (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))))))
✓	65.6%	(.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (.f64 (log.f64 (.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
✓	99.2%	#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
✓	59.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
✓	48.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
✓	18.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))

Compiler

Compiled 2 787 to 662 computations (76.2% saved)

regimes30.0ms (0%)

Memory

-27.2MiB live, 20.3MiB allocated; 1ms collecting garbage

Counts

21 → 1

Calls

Call 1

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes13.0ms (0%)

Memory

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

Counts

7 → 1

Calls

Call 1

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes9.0ms (0%)

Memory

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

Counts

3 → 3

Calls

Call 1

Inputs

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

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

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

Outputs

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

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes7.0ms (0%)

Memory

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

Counts

2 → 3

Calls

Call 1

Inputs

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

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

Outputs

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

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
48.4%	1	`r`
48.4%	1	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
55.9%	3	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
51.6%	3	`a`
56.0%	3	`b`

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes6.0ms (0%)

Memory

-38.5MiB live, 9.3MiB allocated; 0ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 19 to 24 computations (-26.3% saved)

bsearch37.0ms (0.1%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
15.0ms	0.24600647803450354	2.8070615516251065
19.0ms	-7.039323620725202	-0.00011810685607068451

Samples

13.0ms	90×	1	valid
9.0ms	134×	0	valid

Compiler

Compiled 2 532 to 1 064 computations (58% saved)

Precisions

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

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

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

adjust: 2.0ms (13.1% of total)

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

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

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

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

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

bsearch37.0ms (0.1%)

Memory

-23.4MiB live, 24.1MiB allocated; 2ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
16.0ms	0.24600647803450354	2.8070615516251065
19.0ms	-7.039323620725202	-0.00011810685607068451

Samples

14.0ms	85×	1	valid
9.0ms	107×	0	valid

Compiler

Compiled 4 002 to 1 680 computations (58% saved)

Precisions

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

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

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

ival-mult: 3.0ms (17.3% of total)

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

adjust: 2.0ms (11.5% of total)

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

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

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

simplify53.0ms (0.1%)

Memory

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

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	164	770
1	345	752
2	974	743
3	4051	741

Stop Event

1×	node limit

Calls

Call 1

Inputs
(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
(if (<=.f64 b #s(literal -4150517416584649/2305843009213693952 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b)))) (if (<=.f64 b #s(literal 1/4 binary64)) #s(approx ( r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b)) #s(approx ( r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))))
(if (<=.f64 b #s(literal -4278419646001971/4503599627370496 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))) (if (<=.f64 b #s(literal 7926335344172073/9007199254740992 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b)) #s(approx ( r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))

Outputs
(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.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)))))
(if (<=.f64 b #s(literal -4150517416584649/2305843009213693952 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b)))) (if (<=.f64 b #s(literal 1/4 binary64)) #s(approx ( r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b)) #s(approx ( r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))))
(if (or (<=.f64 b #s(literal -4150517416584649/2305843009213693952 binary64)) (not (<=.f64 b #s(literal 1/4 binary64)))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (.f64 (neg.f64 r) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (.f64 (neg.f64 r) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (.f64 r (tan.f64 b)))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (neg.f64 r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (sin.f64 a)) (neg.f64 (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (neg.f64 r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b (/.f64 r (cos.f64 a))) b)))
(if (<=.f64 b #s(literal -4278419646001971/4503599627370496 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))) (if (<=.f64 b #s(literal 7926335344172073/9007199254740992 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b)) #s(approx ( r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))))
(if (or (<=.f64 b #s(literal -4278419646001971/4503599627370496 binary64)) (not (<=.f64 b #s(literal 7926335344172073/9007199254740992 binary64)))) #s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b))))))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (neg.f64 r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (sin.f64 a)) (neg.f64 (cos.f64 a)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (neg.f64 r)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b (/.f64 (.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b (/.f64 r (cos.f64 a))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (neg a) (+ (* (* r (pow (tan b) 2)) -1/2) (+ (* 1/6 (* r (pow (tan b) 2))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3))))) a) (* 1 (* r (pow (tan b) 2)))) a) (* r (tan b))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (cos.f64 b)))) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b) (+.f64 (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (.f64 a (cos.f64 b)) #s(literal 2 binary64))) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))

derivations128.0ms (0.2%)

Memory

-11.5MiB live, 37.2MiB allocated; 1ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 780 to 167 computations (78.6% saved)

preprocess55.0ms (0.1%)

Memory: -12.3MiB live, 35.0MiB allocated; 2ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 1 610 to 374 computations (76.8% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze255.0ms (0.4%)

sample2.2s (3.4%)

explain134.0ms (0.2%)

preprocess229.0ms (0.4%)

eval0.0ms (0%)

prune0.0ms (0%)

series24.0ms (0%)

rewrite190.0ms (0.3%)

eval12.0ms (0%)

prune42.0ms (0.1%)

series334.0ms (0.5%)

rewrite310.0ms (0.5%)

eval403.0ms (0.6%)

prune15.7s (24.4%)

series385.0ms (0.6%)

rewrite378.0ms (0.6%)

eval441.0ms (0.7%)

prune25.5s (39.8%)

series278.0ms (0.4%)

rewrite268.0ms (0.4%)

eval282.0ms (0.4%)

prune16.4s (25.7%)

regimes30.0ms (0%)

regimes13.0ms (0%)

regimes9.0ms (0%)

regimes7.0ms (0%)

regimes6.0ms (0%)

bsearch37.0ms (0.1%)

bsearch37.0ms (0.1%)

simplify53.0ms (0.1%)

derivations128.0ms (0.2%)

preprocess55.0ms (0.1%)

end0.0ms (0%)

Profiling