Metrics for rsin A (should all be same)

start0.0ms (0%)

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

analyze586.0ms (0.9%)

Memory

-82.8MiB live, 304.0MiB allocated; 670ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 11 to 10 computations (9.1% saved)

sample1.5s (2.2%)

Memory

15.2MiB live, 1 240.7MiB allocated; 128ms collecting garbage

Samples

989.0ms	6 058×	1	valid
145.0ms	2 198×	0	valid

Precisions

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

ival-cos: 271.0ms (31.6% of total)

ival-sin: 205.0ms (23.9% of total)

adjust: 155.0ms (18.1% of total)

ival-add: 83.0ms (9.7% of total)

ival-div: 74.0ms (8.6% of total)

ival-mult: 69.0ms (8% of total)

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

Bogosity

explain125.0ms (0.2%)

Memory

14.8MiB live, 109.9MiB allocated; 3ms 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 a b)`
0	0	-	-	`(sin.f64 b)`
0	0	-	-	`a`
0	0	-	-	`(*.f64 r (sin.f64 b))`
0	0	-	-	`r`
0	0	-	-	`b`
0	0	-	-	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (+.f64 a b))`	sensitivity	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

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

Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions

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

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

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

adjust: 10.0ms (19.3% of total)

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

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

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

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

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

preprocess180.0ms (0.3%)

Memory

31.7MiB live, 78.5MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	38	97
1	103	97
2	251	97
3	573	97
4	1013	97
5	2045	97
6	4337	97
0	8	9
0	13	9
1	24	9
2	42	9
3	65	9
4	83	9
5	107	9
6	205	9
7	799	9
8	5290	9
0	8277	9

Stop Event

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

Calls

Call 1

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

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

Symmetry

(negabs r)

Compiler

Compiled 9 to 8 computations (11.1% saved)

eval0.0ms (0%)

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

prune0.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Compiler

Compiled 9 to 8 computations (11.1% saved)

series29.0ms (0%)

Memory

-32.2MiB live, 19.0MiB allocated; 3ms collecting garbage

Counts

8 → 42

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite154.0ms (0.2%)

Memory

11.9MiB live, 104.3MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	228	937
0	235	901
1	1325	845
0	8049	811

Stop Event

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

Counts

50 → 77

Calls

Call 1

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

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

eval10.0ms (0%)

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

prune35.0ms (0.1%)

Memory

-17.9MiB live, 28.8MiB allocated; 2ms collecting garbage

Pruning

7 alts after pruning (7 fresh and 0 done)

	Pruned	Kept	Total
New	72	7	79
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	73	7	80

Accuracy

99.8%

Counts

80 → 7

Alt Table

Click to see full alt table

Status	Accuracy	Program
	37.4%	(/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
	78.0%	(/.f64 (.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))))))
▶	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
▶	59.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))))) a (.f64 r (tan.f64 b))))
▶	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 662 to 292 computations (55.9% saved)

series292.0ms (0.4%)

Memory

-6.9MiB live, 232.3MiB allocated; 30ms collecting garbage

Counts

77 → 498

Calls

Call 1

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

Calls

9 calls:

Time	Variable		Point	Expression
47.0ms	a	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* (+ (* (+ (* (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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (tan b) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b)))) (/ (* r (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))))) (/ (- (* (* (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 a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos 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))) (/ (* 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))))))) (/ (- (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) (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 a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
35.0ms	r	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* (+ (* (+ (* (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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (tan b) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b)))) (/ (* r (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))))) (/ (- (* (* (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 a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos 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))) (/ (* 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))))))) (/ (- (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) (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 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	r	@	0	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* (+ (* (+ (* (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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (tan b) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b)))) (/ (* r (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))))) (/ (- (* (* (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 a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos 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))) (/ (* 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))))))) (/ (- (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) (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 a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
27.0ms	a	@	0	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* (+ (* (+ (* (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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (tan b) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b)))) (/ (* r (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))))) (/ (- (* (* (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 a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos 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))) (/ (* 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))))))) (/ (- (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) (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 a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
26.0ms	r	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* (+ (* (+ (* (+ (* (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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) a) (* r (tan b))) (+ (* (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))))) (- (* (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b))))) (neg a) (+ (* (* r (* (tan b) (tan b))) -1/2) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -1/2 (* r (tan b))) (neg (* r (pow (tan b) 3)))) (sin b)) (cos b)))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (tan b) (+ (* 1/6 (* r (* (tan b) (tan b)))) (/ (* (+ (* -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 (* (tan b) (tan b)))) (/ (* r (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))))) (/ (- (* (* (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 a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos 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))) (/ (* 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))))))) (/ (- (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) (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 a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))

rewrite269.0ms (0.4%)

Memory

36.3MiB live, 226.0MiB allocated; 14ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2711	34317
0	2889	32900
0	8461	31790

Stop Event

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

Counts

575 → 664

Calls

Call 1

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

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

eval294.0ms (0.4%)

Memory: 13.0MiB live, 286.8MiB allocated; 35ms collecting garbage
Compiler: Compiled 139 899 to 9 047 computations (93.5% saved)

prune14.1s (21%)

Memory

2.0MiB live, 12 375.9MiB allocated; 1.8s collecting garbage

Pruning

13 alts after pruning (10 fresh and 3 done)

	Pruned	Kept	Total
New	1 588	9	1 597
Fresh	1	1	2
Picked	2	3	5
Done	0	0	0
Total	1 591	13	1 604

Accuracy

100.0%

Counts

1 604 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
	37.4%	(/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
	99.3%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (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 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (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)))))))
▶	99.4%	(/.f64 (.f64 r (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)))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (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.2%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶	65.6%	(/.f64 (.f64 r (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.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
	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)))))
▶	78.0%	#s(approx (/ (* r (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))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (cos.f64 (-.f64 a 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)))))
✓	59.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))))) a (.f64 r (tan.f64 b))))
✓	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 1 333 to 552 computations (58.6% saved)

series349.0ms (0.5%)

Memory

7.9MiB live, 281.9MiB allocated; 40ms collecting garbage

Counts

54 → 415

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
116.0ms	a	@	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)) r (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) (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 b)))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (* (sin b) (cos (- a b)))) (* (sin b) (cos (- a b))) (cos (- a b)) (- a 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) (/ (* r (sin b)) (/ (- (exp (* (log (* (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))))))) (/ (- (exp (* (log (* (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)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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 (* (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)))) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2))
101.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)) r (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) (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 b)))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (* (sin b) (cos (- a b)))) (* (sin b) (cos (- a b))) (cos (- a b)) (- a 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) (/ (* r (sin b)) (/ (- (exp (* (log (* (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))))))) (/ (- (exp (* (log (* (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)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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 (* (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)))) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2))
27.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)) r (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) (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 b)))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (* (sin b) (cos (- a b)))) (* (sin b) (cos (- a b))) (cos (- a b)) (- a 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) (/ (* r (sin b)) (/ (- (exp (* (log (* (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))))))) (/ (- (exp (* (log (* (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)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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 (* (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)))) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2))
27.0ms	a	@	-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)) r (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) (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 b)))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (* (sin b) (cos (- a b)))) (* (sin b) (cos (- a b))) (cos (- a b)) (- a 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) (/ (* r (sin b)) (/ (- (exp (* (log (* (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))))))) (/ (- (exp (* (log (* (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)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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 (* (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)))) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2))
16.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)) r (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) (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 b)))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (* (sin b) (cos (- a b)))) (* (sin b) (cos (- a b))) (cos (- a b)) (- a 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) (/ (* r (sin b)) (/ (- (exp (* (log (* (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))))))) (/ (- (exp (* (log (* (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)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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 (* (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)))) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (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))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2))

rewrite226.0ms (0.3%)

Memory

27.3MiB live, 254.3MiB allocated; 31ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1710	20810
0	1847	18295
0	8245	17709

Stop Event

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

Counts

469 → 683

Calls

Call 1

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

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

eval292.0ms (0.4%)

Memory: -39.4MiB live, 356.1MiB allocated; 77ms collecting garbage
Compiler: Compiled 120 018 to 6 360 computations (94.7% saved)

prune16.1s (24%)

Memory

63.9MiB live, 15 776.1MiB allocated; 2.3s collecting garbage

Pruning

11 alts after pruning (7 fresh and 4 done)

	Pruned	Kept	Total
New	1 643	5	1 648
Fresh	3	2	5
Picked	4	1	5
Done	0	3	3
Total	1 650	11	1 661

Accuracy

100.0%

Counts

1 661 → 11

Alt Table

Click to see full alt table

Status	Accuracy	Program
	37.4%	(/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
✓	99.4%	(/.f64 (.f64 r (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)))))))
	99.4%	(/.f64 (.f64 r (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 (.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)) (.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 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (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.2%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (/.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)))))))))))
▶	65.6%	(/.f64 (.f64 r (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 (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)))))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
▶	99.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (/ (- ( (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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 2 binary64)) (pow.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)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (.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 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
▶	99.3%	#s(approx (/ (* r (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))))) (/.f64 (.f64 r (fma.f64 (sin.f64 b) (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.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)))))
✓	59.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))))) a (.f64 r (tan.f64 b))))
✓	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 1 451 to 495 computations (65.9% saved)

series240.0ms (0.4%)

Memory

-11.8MiB live, 272.6MiB allocated; 56ms collecting garbage

Counts

65 → 507

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
40.0ms	b	@	inf	((/ (* r (sin b)) (/ (- (* (pow (cos a) 3) (pow (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)) r (sin b) b (/ (- (* (pow (cos a) 3) (pow (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (cos a) a 3 (pow (cos b) 3) (cos b) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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 a) (cos 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)) (/ (- (* (* (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 b) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b))))) (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b)))) (* (sin 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) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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)) (- (+ (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 (* (cos a) (cos b)) 2) (pow (* (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)) 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 a) (* (cos b) (* (sin a) (sin b)))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (/ (* r (sin b)) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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))))))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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)))))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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 (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 (- (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)) 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))))))
32.0ms	a	@	inf	((/ (* r (sin b)) (/ (- (* (pow (cos a) 3) (pow (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)) r (sin b) b (/ (- (* (pow (cos a) 3) (pow (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (cos a) a 3 (pow (cos b) 3) (cos b) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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 a) (cos 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)) (/ (- (* (* (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 b) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b))))) (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b)))) (* (sin 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) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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)) (- (+ (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 (* (cos a) (cos b)) 2) (pow (* (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)) 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 a) (* (cos b) (* (sin a) (sin b)))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (/ (* r (sin b)) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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))))))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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)))))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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 (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 (- (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)) 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))))))
31.0ms	a	@	-inf	((/ (* r (sin b)) (/ (- (* (pow (cos a) 3) (pow (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)) r (sin b) b (/ (- (* (pow (cos a) 3) (pow (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (cos a) a 3 (pow (cos b) 3) (cos b) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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 a) (cos 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)) (/ (- (* (* (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 b) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b))))) (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b)))) (* (sin 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) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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)) (- (+ (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 (* (cos a) (cos b)) 2) (pow (* (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)) 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 a) (* (cos b) (* (sin a) (sin b)))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (/ (* r (sin b)) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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))))))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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)))))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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 (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 (- (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)) 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))))))
28.0ms	b	@	-inf	((/ (* r (sin b)) (/ (- (* (pow (cos a) 3) (pow (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)) r (sin b) b (/ (- (* (pow (cos a) 3) (pow (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (cos a) a 3 (pow (cos b) 3) (cos b) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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 a) (cos 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)) (/ (- (* (* (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 b) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b))))) (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b)))) (* (sin 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) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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)) (- (+ (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 (* (cos a) (cos b)) 2) (pow (* (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)) 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 a) (* (cos b) (* (sin a) (sin b)))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (/ (* r (sin b)) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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))))))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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)))))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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 (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 (- (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)) 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))))))
22.0ms	r	@	0	((/ (* r (sin b)) (/ (- (* (pow (cos a) 3) (pow (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)) r (sin b) b (/ (- (* (pow (cos a) 3) (pow (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (cos a) a 3 (pow (cos b) 3) (cos b) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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 a) (cos 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)) (/ (- (* (* (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 b) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* r (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b))))) (+ (* (sin b) (* (cos a) (cos b))) (* (sin b) (* (sin a) (sin b)))) (* (sin 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) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (pow (* (cos a) (cos b)) 2) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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)) (- (+ (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 (* (cos a) (cos b)) 2) (pow (* (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)) 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 a) (* (cos b) (* (sin a) (sin b)))) (* (cos b) (* (sin a) (sin b))) (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (/ (* r (sin b)) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (exp (* (log (* (cos a) (cos b))) 3)) (pow (* (sin a) (sin b)) 3)) (exp (* (log (* (cos a) (cos b))) 3)) (* (log (* (cos a) (cos b))) 3) (log (* (cos a) (cos b))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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))))))))))) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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)))))))))) (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin 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 (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 (- (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)) 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))))))

rewrite284.0ms (0.4%)

Memory

-6.8MiB live, 321.6MiB allocated; 39ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2446	34334
0	2623	26763
0	8800	25866

Stop Event

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

Counts

572 → 715

Calls

Call 1

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

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

eval456.0ms (0.7%)

Memory: 35.0MiB live, 553.6MiB allocated; 72ms collecting garbage
Compiler: Compiled 303 661 to 11 442 computations (96.2% saved)

prune31.4s (46.7%)

Memory

31.9MiB live, 10 640.8MiB allocated; 580ms collecting garbage

Pruning

9 alts after pruning (1 fresh and 8 done)

	Pruned	Kept	Total
New	2 330	1	2 331
Fresh	2	0	2
Picked	0	5	5
Done	1	3	4
Total	2 333	9	2 342

Accuracy

100.0%

Counts

2 342 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.4%	(/.f64 (.f64 r (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)))))))
✓	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (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.3%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (/.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 (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 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.2%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (/.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)))))))))))
✓	65.6%	(/.f64 (.f64 r (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 (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)))))))
✓	99.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (/ (- ( (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (/ (+ (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (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 2 binary64)) (pow.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)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (.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 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
✓	99.3%	#s(approx (/ (* r (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))))) (/.f64 (.f64 r (fma.f64 (sin.f64 b) (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.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)))))
✓	59.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 a) (fma.f64 (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (.f64 r (tan.f64 b)) (neg.f64 (.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (.f64 #s(literal 1 binary64) (.f64 r (.f64 (tan.f64 b) (tan.f64 b))))) a (.f64 r (tan.f64 b))))
✓	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 2 460 to 499 computations (79.7% saved)

regimes25.0ms (0%)

Memory

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

Counts

23 → 1

Calls

Call 1

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes10.0ms (0%)

Memory

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

Counts

7 → 1

Calls

Call 1

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

Outputs

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes7.0ms (0%)

Memory

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

Counts

3 → 1

Calls

Call 1

Inputs

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

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

Outputs

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes6.0ms (0%)

Memory

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

Counts

2 → 3

Calls

Call 1

Inputs

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

Outputs

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes5.0ms (0%)

Memory

-41.8MiB live, 5.9MiB allocated; 1ms collecting garbage

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

bsearch34.0ms (0.1%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
13.0ms	0.24600647803450354	2.8070615516251065
18.0ms	-7.039323620725202	-0.00011810685607068451

Samples

12.0ms	90×	1	valid
8.0ms	134×	0	valid

Compiler

Compiled 2 574 to 1 050 computations (59.2% saved)

Precisions

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

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

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

adjust: 2.0ms (14.4% of total)

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

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

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

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

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

simplify52.0ms (0.1%)

Memory

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

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	99	445
1	204	445
2	480	445
3	1606	401
4	6173	401

Stop Event

1×	node limit

Calls

Call 1

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

derivations108.0ms (0.2%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 445 to 96 computations (78.4% saved)

preprocess49.0ms (0.1%)

Memory: -21.7MiB live, 25.1MiB allocated; 2ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 972 to 256 computations (73.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze586.0ms (0.9%)

sample1.5s (2.2%)

explain125.0ms (0.2%)

preprocess180.0ms (0.3%)

eval0.0ms (0%)

prune0.0ms (0%)

series29.0ms (0%)

rewrite154.0ms (0.2%)

eval10.0ms (0%)

prune35.0ms (0.1%)

series292.0ms (0.4%)

rewrite269.0ms (0.4%)

eval294.0ms (0.4%)

prune14.1s (21%)

series349.0ms (0.5%)

rewrite226.0ms (0.3%)

eval292.0ms (0.4%)

prune16.1s (24%)

series240.0ms (0.4%)

rewrite284.0ms (0.4%)

eval456.0ms (0.7%)

prune31.4s (46.7%)

regimes25.0ms (0%)

regimes10.0ms (0%)

regimes7.0ms (0%)

regimes6.0ms (0%)

regimes5.0ms (0%)

bsearch34.0ms (0.1%)

simplify52.0ms (0.1%)

derivations108.0ms (0.2%)

preprocess49.0ms (0.1%)

end0.0ms (0%)

Profiling