Metrics for rsin A (should all be same)

start0.0ms (0%)

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

analyze270.0ms (3%)

Memory

22.4MiB live, 305.5MiB allocated; 42ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 11 to 10 computations (9.1% saved)

sample2.2s (24.1%)

Memory

-64.8MiB live, 1 773.6MiB allocated; 1.1s collecting garbage

Samples

1.2s	6 058×	1	valid
198.0ms	2 198×	0	valid

Precisions

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

ival-cos: 276.0ms (26.8% of total)

ival-sin: 255.0ms (24.8% of total)

adjust: 183.0ms (17.8% of total)

ival-div: 124.0ms (12.1% of total)

ival-mult: 95.0ms (9.2% of total)

ival-add: 92.0ms (8.9% of total)

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

Bogosity

explain140.0ms (1.6%)

Memory

-20.8MiB live, 171.7MiB allocated; 19ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
64	134	(3.456954268739464e+25 1.935834574494878e+61 7.268350029723887e-208)	-	`(cos.f64 (+.f64 a b))`
0	0	-	-	`(+.f64 a b)`
0	0	-	-	`(sin.f64 b)`
0	0	-	-	`a`
0	0	-	-	`(*.f64 r (sin.f64 b))`
0	0	-	-	`r`
0	0	-	-	`b`
0	0	-	-	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (+.f64 a b))`	sensitivity	198	0

Confusion

	Predicted +	Predicted -
+	64	0
-	134	58

Precision

0.32323232323232326

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	64	0	0
-	134	0	58

Precision?

0.32323232323232326

Recall?

1.0

Freqs

test

number	freq
0	58
1	198

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

74.0ms	394×	1	valid
8.0ms	118×	0	valid

Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions

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

ival-cos: 21.0ms (35.5% of total)

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

adjust: 10.0ms (16.9% of total)

ival-add: 7.0ms (11.8% of total)

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

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

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

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

preprocess203.0ms (2.3%)

Memory

10.4MiB live, 100.7MiB allocated; 13ms 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) (sin.f64 (fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.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.3MiB live, 0.3MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

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

Compiler

Compiled 9 to 8 computations (11.1% saved)

series17.0ms (0.2%)

Memory

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

Counts

8 → 42

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite204.0ms (2.3%)

Memory

29.8MiB live, 118.4MiB allocated; 20ms 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 (cos.f64 (+.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (cos.f64 (+.f64 (+.f64 a b) (PI.f64))))
(/.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 (fma.f64 (.f64 b b) b (pow.f64 a #s(literal 3 binary64))) (fma.f64 (fabs.f64 b) (fabs.f64 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 (fma.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 a #s(literal 3/2 binary64)) (.f64 (.f64 b b) b))) (neg.f64 (fma.f64 (fabs.f64 a) (fabs.f64 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 (fma.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 a #s(literal 3/2 binary64)) (.f64 (.f64 b b) b)) (fma.f64 (fabs.f64 a) (fabs.f64 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 (fabs.f64 a) (fabs.f64 a) (-.f64 (.f64 b b) (.f64 a b)))) (/.f64 (.f64 (.f64 b b) b) (fma.f64 (fabs.f64 a) (fabs.f64 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 r (tan.f64 b) (/.f64 (.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) a) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b))))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (fma.f64 (*.f64 (sin.f64 b) a) #s(literal -1 binary64) (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 (fma.f64 (/.f64 b a) #s(literal 1 binary64) #s(literal 1 binary64)) a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ a b) (.f64 (.f64 (-.f64 (*.f64 (/.f64 b a) #s(literal -1 binary64)) #s(literal 1 binary64)) 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 (+.f64 (/.f64 (.f64 (*.f64 (sin.f64 a) r) b) (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 (fma.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64)))) b (/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 a) r)) (*.f64 #s(literal 2 binary64) (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 (.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 a) r) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 a) r))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64))))) b (/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 a) r)) (*.f64 #s(literal 2 binary64) (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 (*.f64 (sin.f64 a) b) #s(literal -1 binary64) (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 (fma.f64 (/.f64 a b) #s(literal 1 binary64) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ a b) (.f64 (.f64 (-.f64 (*.f64 (/.f64 a b) #s(literal -1 binary64)) #s(literal 1 binary64)) b) #s(literal -1 binary64)))

eval14.0ms (0.2%)

Memory: -22.3MiB live, 20.6MiB allocated; 6ms collecting garbage
Compiler: Compiled 1 719 to 384 computations (77.7% saved)

prune22.0ms (0.2%)

Memory

3.5MiB live, 50.1MiB allocated; 3ms collecting garbage

Pruning

6 alts after pruning (6 fresh and 0 done)

	Pruned	Kept	Total
New	73	6	79
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	74	6	80

Accuracy

99.8%

Counts

80 → 6

Alt Table

Click to see full alt table

Status	Accuracy	Program
	78.2%	(/.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))))
▶	78.6%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
▶	59.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b))))

Compiler

Compiled 564 to 244 computations (56.7% saved)

series309.0ms (3.4%)

Memory

13.5MiB live, 341.7MiB allocated; 67ms collecting garbage

Counts

74 → 470

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))) (fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b))))
(fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b)))
(fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
(.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))))))
(*.f64 #s(literal -1 binary64) a)
#s(literal -1 binary64)
(fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))
(/.f64 #s(literal -1/2 binary64) (cos.f64 b))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))))
(/.f64 #s(literal 1/6 binary64) (cos.f64 b))
#s(literal 1/6 binary64)
(+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))
(/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b))
(.f64 (/.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
(pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))
(.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b))
(.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) r)
(/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))))
(.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))
(*.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r))
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (.f64 r (sin.f64 b)) (/.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))
#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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* r (+ (* a (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))) (+ (* -1 (/ (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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* r (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* r (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* -1 (* a (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (cos b))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* r (pow (sin b) 2))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 3)))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* -1 (* r (pow (sin b) 3)))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* r (pow (sin b) 3))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* -1/2 (/ (* r (pow (sin b) 2)) (cos b)))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (cos b)))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* -1/2 (* r (sin b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (/ (* r (+ (* -1 (* (cos b) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (sin b))))) (pow (cos b) 4))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* r (+ (* -1 (* (cos b) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (sin b)))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* -1 (* r (* (cos b) (pow (sin b) 3))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* 2 (* r (pow (sin b) 2)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4)))))) (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4)))))) (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (* r (- (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4)))))) (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* a (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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))) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (pow (sin b) 4) (pow (cos b) 4)))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* -1 (/ (* r (+ (* 1/2 (* (pow (cos b) 3) (sin b))) (* (cos b) (pow (sin b) 3)))) (pow (cos b) 4)))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (* (pow (cos b) 3) (sin b))) (* (cos b) (pow (sin 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* -1 (* a (+ (* -1 (/ (* 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* -1 (+ (* -1 (/ (* 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (+ (* -1 (* a (+ (* -1 (/ (* 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* -1 (+ (* -1 (/ (* 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 (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (* -1 a) #s(hole binary64 (* -1 a)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* -1 (* (pow a 2) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* a (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1/2 (/ (* r (sin b)) (* a (cos b)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) a))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1/2 (/ (* r (sin b)) (* a (cos b)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (- (* (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (* 1/2 (* (pow a 2) r))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* a (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* -1 (* (pow a 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (* 1/3 r))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* -1 (* (pow a 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (+ (* 1/3 r) (* a (* b (- (+ (* -1 (* (pow a 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r))))))) (* -1/3 r)) (* -1 r))))))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* 1/2 (* a (* b r)))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* a (* b (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))))) (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))) (* b (+ (* -1 (* a (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (* b (- (+ (* -1 (* (pow a 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r))))))) (* -1/3 r)) (* -1 r))))))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* 1/2 (* b r))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* b (- (* -1 (* a (* b (+ (* -1 r) (* 1/6 r))))) (* -1/2 r)))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* -1 (* b (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 r)))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* b (- (* -1 (* a (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 r)))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* -1 (* a (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))) (* -1 (* a (+ (* -1 r) (* 1/6 r))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))) (* -1 (* a (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r))))))) (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (+ (* -1 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))) (* -1 (* a (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (+ (* -1 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))))))))))))))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 -1/2))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (- (* -1/4 (pow b 2)) 1/2)))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (- (* (pow b 2) (- (* -5/48 (pow b 2)) 1/4)) 1/2)))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (- (* (pow b 2) (- (* (pow b 2) (- (* -61/1440 (pow b 2)) 5/48)) 1/4)) 1/2)))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1/2 r)))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1/2 (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/3 r) (* -1/2 r)))))))) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) (+ r (* -1/3 (* (pow b 2) r))))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* 2/45 (* (pow b 2) r))))))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* (pow b 2) (+ (* -1/315 (* (pow b 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* 1/6 r)))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (+ (* -1/2 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))))))))))))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 1/6))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (+ 1/6 (* 1/12 (pow b 2)))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (+ 1/6 (* (pow b 2) (+ 1/12 (* 5/144 (pow b 2)))))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (+ 1/6 (* (pow b 2) (+ 1/12 (* (pow b 2) (+ 5/144 (* 61/4320 (pow b 2)))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (* -1/2 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))))))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (* -1/2 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* -1 (* (pow b 4) r))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -2/3 r) (* -2 r))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))) (* -1 (- (* -2/3 r) (* -2 r)))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* -34/945 r) (+ (* -2 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (+ (* -34/45 r) (* 5/3 (- (* -2/3 r) (* -2 r)))))))) (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* -1 (* (pow b 4) r))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -2/3 r) (* -3/2 r))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 1/5 r) (+ (* -3/2 (- (* -2/3 r) (* -3/2 r))) (* 7/8 r))))) (* -1 (- (* -2/3 r) (* -3/2 r)))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -3/2 r))) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* -34/945 r) (+ (* -3/2 (- (* 1/5 r) (+ (* -3/2 (- (* -2/3 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -2/3 r) (* -3/2 r)))))))) (* -1 (- (* 1/5 r) (+ (* -3/2 (- (* -2/3 r) (* -3/2 r))) (* 7/8 r))))))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -1/2 r) (* -3/2 r))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -1 (- (* -1/2 r) (* -3/2 r)))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* -41/3024 r) (+ (* -3/2 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/2 r) (* -3/2 r)))))))) (* -1 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))))))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* 1/2 (* (pow b 2) r))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* -13/120 (* (pow b 2) r)) (* 1/2 r)))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* 1/2 r) (* (pow b 2) (+ (* -13/120 r) (* 41/3024 (* (pow b 2) r))))))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) (+ r (* -1/2 (* (pow b 2) r))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* 13/120 (* (pow b 2) r))))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) r)) (* 13/120 r)))))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (pow b 3)))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/3 r) (* -1 r))))))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1/2 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/3 r) (* -1/2 r))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/3 r) (* -1/2 r)))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/315 r) (+ (* -1/2 (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/3 r) (* -1/2 r)))))))) (* -1/2 (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* b (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* b (+ (* -1/2 r) (* 1/12 (* (pow b 2) r))))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/240 (* (pow b 2) r)) (* 1/12 r)))))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* 1/12 r) (* (pow b 2) (+ (* -1/240 r) (* 1/10080 (* (pow b 2) r))))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1 r) (* 5/6 r)) r))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (- (+ r (* -17/30 r)) (+ (* -2 (- (+ (* -1 r) (* 5/6 r)) r)) (* -5/6 r)))))) r))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (- (+ r (+ (* -17/30 r) (* (pow b 2) (- (+ (* -2/5 r) (* 13/63 r)) (+ (* -2 (- (+ r (* -17/30 r)) (+ (* -2 (- (+ (* -1 r) (* 5/6 r)) r)) (* -5/6 r)))) (+ (* 17/45 r) (* 5/3 (- (+ (* -1 r) (* 5/6 r)) r)))))))) (+ (* -2 (- (+ (* -1 r) (* 5/6 r)) r)) (* -5/6 r)))))) r))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (* 5/6 r)))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (+ r (* -17/30 r))))))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (+ r (+ (* -17/30 r) (* (pow b 2) (+ (* -2/5 r) (* 13/63 r)))))))))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) r)))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ r (* -2/5 (* (pow b 2) r))))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ r (* (pow b 2) (+ (* -2/5 r) (* 17/189 (* (pow b 2) r))))))))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 1))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ 1 (* -2 (pow b 2)))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 5/3 (pow b 2)) 2)))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 5/3 (* -34/45 (pow b 2)))) 2)))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1 r)))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* 2 (* (pow b 2) r))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* (pow b 2) (+ (* -2/3 (* (pow b 2) r)) (* 2 r)))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* (pow b 2) (+ (* 2 r) (* (pow b 2) (+ (* -2/3 r) (* 4/45 (* (pow b 2) r))))))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* (pow b 2) (+ (* 2 r) (* (pow b 2) (+ (* -2/3 r) (* (pow b 2) (+ (* -2/315 (* (pow b 2) r)) (* 4/45 r)))))))))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 2))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (+ 2 (* -2 (pow b 2)))))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (+ 2 (* (pow b 2) (- (* 2/3 (pow b 2)) 2)))))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (+ 2 (* (pow b 2) (- (* (pow b 2) (+ 2/3 (* -4/45 (pow b 2)))) 2)))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (+ (* -1 (/ (* 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (+ (* -1 (/ (* 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 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (/ -1/2 (cos b))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (/ 1/6 (cos b))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (pow (sin b) 3)))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (/ (+ (* -1 (* r (* (cos b) (pow (sin b) 3)))) (* -1/2 (* r (* (pow (cos b) 3) (sin b))))) (pow (cos b) 4))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (+ (* -1 (* r (* (cos b) (pow (sin b) 3)))) (* -1/2 (* r (* (pow (cos b) 3) (sin b)))))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (* 2 (pow (cos b) 2))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos 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 (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))

Calls

9 calls:

Time	Variable		Point	Expression
55.0ms	b	@	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))) (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (* -1 a) -1 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (/ -1/2 (cos b)) -1/2 (/ (* (pow (sin b) 2) r) (cos b)) (* (pow (sin b) 2) r) (pow (sin b) 2) 2 (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) (/ 1/6 (cos b)) 1/6 (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (* (pow (pow (sin b) 2) 3/2) r) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (pow (cos b) 2) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (/ (* -1/2 (* (sin b) r)) (cos b)) (* -1/2 (* (sin b) r)) (* (sin b) r) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (* (cos b) (pow (pow (cos b) 2) 3/2)) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (/ (- (* (* (cos a) (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) 3 (pow (* (sin a) (sin b)) 3) (+ (* (* (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))))
52.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))) (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (* -1 a) -1 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (/ -1/2 (cos b)) -1/2 (/ (* (pow (sin b) 2) r) (cos b)) (* (pow (sin b) 2) r) (pow (sin b) 2) 2 (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) (/ 1/6 (cos b)) 1/6 (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (* (pow (pow (sin b) 2) 3/2) r) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (pow (cos b) 2) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (/ (* -1/2 (* (sin b) r)) (cos b)) (* -1/2 (* (sin b) r)) (* (sin b) r) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (* (cos b) (pow (pow (cos b) 2) 3/2)) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (/ (- (* (* (cos a) (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) 3 (pow (* (sin a) (sin b)) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
33.0ms	b	@	inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (* -1 a) -1 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (/ -1/2 (cos b)) -1/2 (/ (* (pow (sin b) 2) r) (cos b)) (* (pow (sin b) 2) r) (pow (sin b) 2) 2 (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) (/ 1/6 (cos b)) 1/6 (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (* (pow (pow (sin b) 2) 3/2) r) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (pow (cos b) 2) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (/ (* -1/2 (* (sin b) r)) (cos b)) (* -1/2 (* (sin b) r)) (* (sin b) r) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (* (cos b) (pow (pow (cos b) 2) 3/2)) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (/ (- (* (* (cos a) (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) 3 (pow (* (sin a) (sin b)) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))
29.0ms	b	@	-inf	((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) 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))) (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (* -1 a) -1 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (/ -1/2 (cos b)) -1/2 (/ (* (pow (sin b) 2) r) (cos b)) (* (pow (sin b) 2) r) (pow (sin b) 2) 2 (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) (/ 1/6 (cos b)) 1/6 (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (* (pow (pow (sin b) 2) 3/2) r) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (pow (cos b) 2) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (/ (* -1/2 (* (sin b) r)) (cos b)) (* -1/2 (* (sin b) r)) (* (sin b) r) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (* (cos b) (pow (pow (cos b) 2) 3/2)) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (/ (- (* (* (cos a) (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) 3 (pow (* (sin a) (sin b)) 3) (+ (* (* (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	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))) (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (* -1 a) -1 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (/ -1/2 (cos b)) -1/2 (/ (* (pow (sin b) 2) r) (cos b)) (* (pow (sin b) 2) r) (pow (sin b) 2) 2 (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) (/ 1/6 (cos b)) 1/6 (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (* (pow (pow (sin b) 2) 3/2) r) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (pow (cos b) 2) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (/ (* -1/2 (* (sin b) r)) (cos b)) (* -1/2 (* (sin b) r)) (* (sin b) r) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (* (cos b) (pow (pow (cos b) 2) 3/2)) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)) (* r (tan b)) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (/ (- (* (* (cos a) (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) 3 (pow (* (sin a) (sin b)) 3) (+ (* (* (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))))

rewrite292.0ms (3.3%)

Memory

6.9MiB live, 384.4MiB allocated; 71ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2419	27314
0	2593	24288
0	8456	23472

Stop Event

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

Counts

544 → 647

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))) (fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b))))
(fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b)))
(fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
(.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))))))
(*.f64 #s(literal -1 binary64) a)
#s(literal -1 binary64)
(fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))
(/.f64 #s(literal -1/2 binary64) (cos.f64 b))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))))
(/.f64 #s(literal 1/6 binary64) (cos.f64 b))
#s(literal 1/6 binary64)
(+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))
(/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b))
(.f64 (/.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
(pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))
(.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b))
(.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) r)
(/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))))
(.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))
(*.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r))
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 a b)
(/.f64 (.f64 r (sin.f64 b)) (/.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))
#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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* r (+ (* a (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))) (+ (* -1 (/ (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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* r (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* r (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* -1 (* a (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (cos b))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* r (pow (sin b) 2))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 3)))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3)))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* -1 (* r (pow (sin b) 3)))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* r (pow (sin b) 3))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* -1/2 (/ (* r (pow (sin b) 2)) (cos b)))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (cos b)))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* -1/2 (* r (sin b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (/ (* r (+ (* -1 (* (cos b) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (sin b))))) (pow (cos b) 4))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* r (+ (* -1 (* (cos b) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (sin b)))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* -1 (* r (* (cos b) (pow (sin b) 3))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* 2 (* r (pow (sin b) 2)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* a (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4)))))) (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))) (* a (- (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4)))))) (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (* r (- (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4)))))) (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* a (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* -1 (* r (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (/ (pow (sin b) 2) (pow (cos b) 2)) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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))) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (pow (sin b) 4) (pow (cos b) 4)))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* -1 (/ (* r (+ (* 1/2 (* (pow (cos b) 3) (sin b))) (* (cos b) (pow (sin b) 3)))) (pow (cos b) 4)))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (* (pow (cos b) 3) (sin b))) (* (cos b) (pow (sin 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* -1 (* a (+ (* -1 (/ (* 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* -1 (+ (* -1 (/ (* 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (+ (* -1 (* a (+ (* -1 (/ (* 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* -1 (+ (* -1 (/ (* 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 (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (* -1 a) #s(hole binary64 (* -1 a)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* -1 (* (pow a 2) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (* -1/2 (/ (* r (sin b)) (* a (cos b)))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* a (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1/2 (/ (* r (sin b)) (* a (cos b)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) a))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1/2 (/ (* r (sin b)) (* a (cos b)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (- (* (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (* 1/2 (* (pow a 2) r))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* a (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* -1 (* (pow a 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (* 1/3 r))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (* b (+ r (+ (* 1/2 (* (pow a 2) r)) (* b (+ (* a (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))) (* b (+ (* -1 (* (pow a 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (+ (* 1/3 r) (* a (* b (- (+ (* -1 (* (pow a 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r))))))) (* -1/3 r)) (* -1 r))))))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* 1/2 (* a (* b r)))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* a (* b (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))))) (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* 1/2 (* a r)) (* b (+ r (+ (* -1 (* (pow a 2) (+ (* -1 r) (* 1/6 r)))) (* b (+ (* -1 (* a (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (* b (- (+ (* -1 (* (pow a 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r))))))) (* -1/3 r)) (* -1 r))))))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* 1/2 (* b r))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* b (- (* -1 (* a (* b (+ (* -1 r) (* 1/6 r))))) (* -1/2 r)))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* -1 (* b (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 r)))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) #s(hole binary64 (* b (- (* b (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* b (- (* -1 (* a (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 r)))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* -1 (* a (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))) (* -1 (* a (+ (* -1 r) (* 1/6 r))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))) (* -1 (* a (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (* 1/6 r)))) (* (pow b 2) (+ (* -1 (* a (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r))))))) (* (pow b 2) (+ (* -1 (* a (* (pow b 2) (+ (* -1 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))) (* -1 (* a (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* 1/6 r)))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (+ (* -1 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))))))))))))))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 -1/2))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (- (* -1/4 (pow b 2)) 1/2)))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (- (* (pow b 2) (- (* -5/48 (pow b 2)) 1/4)) 1/2)))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (- (* (pow b 2) (- (* (pow b 2) (- (* -61/1440 (pow b 2)) 5/48)) 1/4)) 1/2)))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1/2 r)))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1/2 (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/3 r) (* -1/2 r)))))))) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) (+ r (* -1/3 (* (pow b 2) r))))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* 2/45 (* (pow b 2) r))))))))
#s(approx (* (pow (sin b) 2) r) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* (pow b 2) (+ (* -1/315 (* (pow b 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* 1/6 r)))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (+ (* 1/6 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* 1/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (+ (* -1/2 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r))))))) (* 1/6 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))))))))))))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 1/6))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (+ 1/6 (* 1/12 (pow b 2)))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (+ 1/6 (* (pow b 2) (+ 1/12 (* 5/144 (pow b 2)))))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (+ 1/6 (* (pow b 2) (+ 1/12 (* (pow b 2) (+ 5/144 (* 61/4320 (pow b 2)))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (* -1/2 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))))))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (+ (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (* (pow b 2) (+ (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (* -1/2 (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))))))))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* -1 (* (pow b 4) r))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -2/3 r) (* -2 r))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))) (* -1 (- (* -2/3 r) (* -2 r)))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -2 r))) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* -34/945 r) (+ (* -2 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r)))) (+ (* -34/45 r) (* 5/3 (- (* -2/3 r) (* -2 r)))))))) (* -1 (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* -1 (* (pow b 4) r))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -2/3 r) (* -3/2 r))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 1/5 r) (+ (* -3/2 (- (* -2/3 r) (* -3/2 r))) (* 7/8 r))))) (* -1 (- (* -2/3 r) (* -3/2 r)))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) #s(hole binary64 (* (pow b 4) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -2/3 r) (* -3/2 r))) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* -34/945 r) (+ (* -3/2 (- (* 1/5 r) (+ (* -3/2 (- (* -2/3 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -2/3 r) (* -3/2 r)))))))) (* -1 (- (* 1/5 r) (+ (* -3/2 (- (* -2/3 r) (* -3/2 r))) (* 7/8 r))))))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -1/2 r) (* -3/2 r))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -1 (- (* -1/2 r) (* -3/2 r)))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* -41/3024 r) (+ (* -3/2 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/2 r) (* -3/2 r)))))))) (* -1 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))))))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* 1/2 (* (pow b 2) r))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* -13/120 (* (pow b 2) r)) (* 1/2 r)))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ (* 1/2 r) (* (pow b 2) (+ (* -13/120 r) (* 41/3024 (* (pow b 2) r))))))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) (+ r (* -1/2 (* (pow b 2) r))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* 13/120 (* (pow b 2) r))))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) r)) (* 13/120 r)))))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (pow b 3)))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/3 r) (* -1 r))))))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1/2 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (* -1/2 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* -1/2 (* (pow b 2) r))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/3 r) (* -1/2 r))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/3 r) (* -1/2 r)))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/315 r) (+ (* -1/2 (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/3 r) (* -1/2 r)))))))) (* -1/2 (- (* 2/45 r) (+ (* -1/2 (- (* -1/3 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* b (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* b (+ (* -1/2 r) (* 1/12 (* (pow b 2) r))))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/240 (* (pow b 2) r)) (* 1/12 r)))))))
#s(approx (* -1/2 (* (sin b) r)) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* 1/12 r) (* (pow b 2) (+ (* -1/240 r) (* 1/10080 (* (pow b 2) r))))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1 r) (* 5/6 r)) r))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (- (+ r (* -17/30 r)) (+ (* -2 (- (+ (* -1 r) (* 5/6 r)) r)) (* -5/6 r)))))) r))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (- (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (- (+ r (+ (* -17/30 r) (* (pow b 2) (- (+ (* -2/5 r) (* 13/63 r)) (+ (* -2 (- (+ r (* -17/30 r)) (+ (* -2 (- (+ (* -1 r) (* 5/6 r)) r)) (* -5/6 r)))) (+ (* 17/45 r) (* 5/3 (- (+ (* -1 r) (* 5/6 r)) r)))))))) (+ (* -2 (- (+ (* -1 r) (* 5/6 r)) r)) (* -5/6 r)))))) r))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (* 5/6 r)))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (+ r (* -17/30 r))))))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* 5/6 r) (* (pow b 2) (+ r (+ (* -17/30 r) (* (pow b 2) (+ (* -2/5 r) (* 13/63 r)))))))))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* -1 (* (pow b 3) r))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) r)))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ r (* -2/5 (* (pow b 2) r))))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) #s(hole binary64 (* (pow b 3) (+ (* -1 r) (* (pow b 2) (+ r (* (pow b 2) (+ (* -2/5 r) (* 17/189 (* (pow b 2) r))))))))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 1))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ 1 (* -2 (pow b 2)))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 5/3 (pow b 2)) 2)))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 5/3 (* -34/45 (pow b 2)))) 2)))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1 r)))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* 2 (* (pow b 2) r))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* (pow b 2) (+ (* -2/3 (* (pow b 2) r)) (* 2 r)))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* (pow b 2) (+ (* 2 r) (* (pow b 2) (+ (* -2/3 r) (* 4/45 (* (pow b 2) r))))))))
#s(approx (* 2 (* (pow (sin b) 2) r)) #s(hole binary64 (* (pow b 2) (+ (* 2 r) (* (pow b 2) (+ (* -2/3 r) (* (pow b 2) (+ (* -2/315 (* (pow b 2) r)) (* 4/45 r)))))))))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 2))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (+ 2 (* -2 (pow b 2)))))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (+ 2 (* (pow b 2) (- (* 2/3 (pow b 2)) 2)))))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (+ 2 (* (pow b 2) (- (* (pow b 2) (+ 2/3 (* -4/45 (pow b 2)))) 2)))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) #s(hole binary64 (+ (* a (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (+ (* -1 (/ (* 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (+ (* -1 (/ (* 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 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))
#s(approx (/ -1/2 (cos b)) #s(hole binary64 (/ -1/2 (cos b))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))
#s(approx (/ 1/6 (cos b)) #s(hole binary64 (/ 1/6 (cos b))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (pow (sin b) 3)))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) #s(hole binary64 (/ (+ (* -1 (* r (* (cos b) (pow (sin b) 3)))) (* -1/2 (* r (* (pow (cos b) 3) (sin b))))) (pow (cos b) 4))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) #s(hole binary64 (+ (* -1 (* r (* (cos b) (pow (sin b) 3)))) (* -1/2 (* r (* (pow (cos b) 3) (sin b)))))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (* 2 (pow (cos b) 2)) #s(hole binary64 (* 2 (pow (cos b) 2))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos 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 (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))

Outputs
(/.f64 (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 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 b) (sin.f64 a)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)) (fma.f64 (.f64 (sin.f64 b) (sin.f64 a)) (.f64 (sin.f64 b) (sin.f64 a)) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))))
(-.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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) #s(literal 3 binary64)) (pow.f64 (.f64 r (tan.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.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 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (*.f64 r (tan.f64 b))))))
(fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b)))
(+.f64 (.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (.f64 r (tan.f64 b)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a) (.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a)) (-.f64 (.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
(fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)))))) (fma.f64 (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))))
(-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (*.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
(.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)))))
(*.f64 #s(literal -1 binary64) a)
#s(literal -1 binary64)
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (-.f64 (.f64 (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)))) (.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)))))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))
(+.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 b)))
(/.f64 #s(literal -1/2 binary64) (cos.f64 b))
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)
(*.f64 (sin.f64 b) (sin.f64 b))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 2 binary64)))
#s(literal 2 binary64)
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) #s(literal 3 binary64)) (pow.f64 (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (-.f64 (.f64 (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))) (.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))))))
(fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)))
(+.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b))) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b)))
(/.f64 #s(literal -1/6 binary64) (neg.f64 (cos.f64 b)))
(/.f64 #s(literal 1/6 binary64) (cos.f64 b))
#s(literal 1/6 binary64)
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b))) (-.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))) (.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))))))
(/.f64 (fma.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (cos.f64 b))
(/.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b) (.f64 (cos.f64 b) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b))) (neg.f64 (cos.f64 b)))
(/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b))
(.f64 (/.f64 (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))) (neg.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)
(*.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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 3 binary64)))
#s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 3 binary64)))
(*.f64 (cos.f64 b) (cos.f64 b))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))) (neg.f64 (cos.f64 b)))
(/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b))
(.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r))) (neg.f64 (cos.f64 b)))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b))
(.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r))
(*.f64 (sin.f64 b) r)
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))))) (neg.f64 (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r))))
(.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))
(*.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r))) (neg.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r))
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (tan.f64 b))
(/.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 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (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 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(/.f64 (fma.f64 (.f64 a a) a (.f64 (.f64 b b) b)) (+.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a b))))
(+.f64 a b)
(/.f64 (neg.f64 (.f64 r (sin.f64 b))) (neg.f64 (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (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 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))
(-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.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))) (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)) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.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))
(*.f64 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (-.f64 (.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 (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 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (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 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(.f64 (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))))
(-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (cos.f64 b)))
(.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))))
(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)))
#s(literal 3 binary64)
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (sin.f64 a) (sin.f64 b)))
(.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))))
(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 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (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)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (-.f64 (.f64 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (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 (neg.f64 (.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (.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 (fabs.f64 (.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (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 (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 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (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))) (+.f64 (.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (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 (.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 (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 (.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 (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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (+.f64 a b))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 r (fma.f64 a (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (.f64 #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 binary64) (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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 r (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (.f64 #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 binary64) (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 (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.f64 r (-.f64 (.f64 #s(literal -1 binary64) (.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (.f64 #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 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (.f64 #s(literal -1 binary64) (.f64 a (.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b)))
#s(approx (* (pow (sin b) 2) r) (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 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 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (.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)))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (.f64 #s(literal -1 binary64) (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) (*.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (cos.f64 b))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* -1/2 (* (sin b) r)) (.f64 #s(literal -1/2 binary64) (.f64 r (sin.f64 b))))
#s(approx (* (sin b) r) (*.f64 r (sin.f64 b)))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (sin.f64 b))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (.f64 #s(literal -1 binary64) (.f64 r (*.f64 (cos.f64 b) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* 2 (* (pow (sin b) 2) r)) (.f64 #s(literal 2 binary64) (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (tan b)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a 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) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (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) (sin b)) 3)) (+ (* (* (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))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (tan.f64 b) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 a (-.f64 (.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))) (/.f64 (fma.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.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)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 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))) (/.f64 (fma.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.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)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.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))) (/.f64 (fma.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.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)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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))) (/.f64 (fma.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.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)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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 (fma.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.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)))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (.f64 #s(literal -1 binary64) (.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))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (sin.f64 b)) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (.f64 #s(literal -1 binary64) (.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (sin.f64 b)) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/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))))))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (/.f64 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 a (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (.f64 a (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.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))) (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 #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)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (.f64 #s(literal -1 binary64) (.f64 a (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))
#s(approx (* -1 a) (*.f64 #s(literal -1 binary64) a))
#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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))
#s(approx (/ (sin b) (cos (+ a b))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 #s(literal -1/2 binary64) (*.f64 a (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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/6 binary64) (.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (* 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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/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))))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #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 (*.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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #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 (.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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/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))))))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/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 (.f64 (.f64 a a) a) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (.f64 (.f64 a a) a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 a a) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (.f64 (.f64 (.f64 a a) a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/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 (+.f64 (.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) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b))) (+.f64 (.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) (+.f64 (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 b) (sin.f64 b))) (+.f64 (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 b) (sin.f64 b))) (+.f64 (.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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 (.f64 (.f64 a a) a) (+.f64 (.f64 #s(literal -1 binary64) (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a)))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 (.f64 (.f64 a a) a) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.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))) (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 #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 a a)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 (.f64 (.f64 a a) a) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.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))) (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 #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)))))) (fma.f64 (/.f64 r (.f64 (.f64 a a) a)) (tan.f64 b) (.f64 (/.f64 r (.f64 a a)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1 binary64) (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) a)))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.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))) (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 #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 a a)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r a) (tan.f64 b)))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) a)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 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)))))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (/ (- (* (* (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (* (* (cos a) (cos b)) (* (cos a) (cos b))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (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))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (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))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.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 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #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)) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (pow (* (cos a) (cos b)) 3) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/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 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (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))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (fma.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))) (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (+.f64 (.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 #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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (fma.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))) (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (tan.f64 b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a))) a) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1 binary64) (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) a)))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.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))) (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 r a) (tan.f64 b)) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))))
#s(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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) 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 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (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) (+.f64 (.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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r)))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 a (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r)))))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 b (fma.f64 a (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))) (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.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/3 binary64) r)))))))))
#s(approx (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (.f64 b (+.f64 r (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) r) (.f64 b (fma.f64 a (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))) (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.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) r (.f64 a (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (.f64 #s(literal -1/3 binary64) r)) (*.f64 #s(literal -1 binary64) r)))))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 #s(literal 1/2 binary64) (.f64 a (*.f64 b r))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (.f64 a r) (.f64 b (+.f64 r (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r)))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (.f64 a r) (.f64 b (+.f64 r (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 b (fma.f64 #s(literal -1 binary64) r (.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 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))))))))))
#s(approx (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (.f64 a r) (.f64 b (+.f64 r (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/6 binary64) r))) (.f64 b (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (.f64 #s(literal -1/3 binary64) r)) (*.f64 #s(literal -1 binary64) r)))))))))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.f64 #s(literal 1/2 binary64) (.f64 b r)))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.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 (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.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 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) r (.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/2 binary64) r))))
#s(approx (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) (.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 #s(literal -1 binary64) (.f64 a (.f64 b (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))))) (fma.f64 #s(literal -1 binary64) r (.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/2 binary64) r))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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 (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 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 (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))))))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))))))
#s(approx (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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 (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 a (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 #s(literal 5/3 binary64) r))) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))))))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))))))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 1/6 binary64) r))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (fma.f64 #s(literal -1 binary64) r (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))) (+.f64 (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r)))))))))))))))
#s(approx (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 #s(literal 5/3 binary64) r))) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))))))))))))))))))
#s(approx (/ -1/2 (cos b)) #s(literal -1/2 binary64))
#s(approx (/ -1/2 (cos b)) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 b b)) #s(literal 1/2 binary64)))
#s(approx (/ -1/2 (cos b)) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -5/48 binary64) (.f64 b b)) #s(literal 1/4 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ -1/2 (cos b)) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -61/1440 binary64) (.f64 b b)) #s(literal 5/48 binary64))) #s(literal 1/4 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) (.f64 (.f64 b b) r))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (+.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* (pow (sin b) 2) r) (cos b)) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2/45 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (* (pow (sin b) 2) r) (.f64 (.f64 b b) r))
#s(approx (* (pow (sin b) 2) r) (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal -1/3 binary64) (.f64 (*.f64 b b) r)))))
#s(approx (* (pow (sin b) 2) r) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) r (.f64 #s(literal 2/45 binary64) (.f64 (*.f64 b b) r)))))))
#s(approx (* (pow (sin b) 2) r) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 b b) r) (.f64 #s(literal 2/45 binary64) r))))))))
#s(approx (pow (sin b) 2) (*.f64 b b))
#s(approx (pow (sin b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 b b)))))
#s(approx (pow (sin b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 b b)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin b) 2) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (.f64 b b)))) #s(literal 1/3 binary64))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (fma.f64 #s(literal -1 binary64) r (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))) (+.f64 (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r)))))))))))))))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (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) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 #s(literal 5/3 binary64) r))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))) (.f64 #s(literal 1/6 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))))))))))))))))
#s(approx (/ 1/6 (cos b)) #s(literal 1/6 binary64))
#s(approx (/ 1/6 (cos b)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal 1/12 binary64) (.f64 b b))))
#s(approx (/ 1/6 (cos b)) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/12 binary64) (.f64 #s(literal 5/144 binary64) (.f64 b b))))))
#s(approx (/ 1/6 (cos b)) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/12 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 5/144 binary64) (.f64 #s(literal 61/4320 binary64) (.f64 b b))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))))))))))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 #s(literal 5/3 binary64) r))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))))))))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) r)))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 #s(literal 5/3 binary64) r)))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r))))))))
#s(approx (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -34/945 binary64) r) (+.f64 (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (.f64 #s(literal 5/3 binary64) r)))) (fma.f64 #s(literal -34/45 binary64) r (.f64 #s(literal 5/3 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r))))))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -2 binary64) r)) (*.f64 #s(literal 5/3 binary64) r)))))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) r)))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r)))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -3/2 binary64) r))))))))
#s(approx (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -34/945 binary64) r) (+.f64 (.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -2/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 -2/3 binary64) r) (.f64 #s(literal -3/2 binary64) r))))))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/5 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (*.f64 #s(literal 7/8 binary64) r)))))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) r)))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 13/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r)))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r))))))))
#s(approx (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -41/3024 binary64) r) (+.f64 (.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal 13/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (.f64 #s(literal 7/8 binary64) r)))) (fma.f64 #s(literal -61/240 binary64) r (.f64 #s(literal 7/8 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r))))))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 13/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 #s(literal -3/2 binary64) r)) (*.f64 #s(literal 7/8 binary64) r)))))))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) r)))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (.f64 (.f64 (.f64 b b) b) (+.f64 (.f64 #s(literal -1 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -13/120 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 1/2 binary64) r))))))
#s(approx (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (.f64 (.f64 (.f64 b b) b) (+.f64 (.f64 #s(literal -1 binary64) r) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -13/120 binary64) r (.f64 #s(literal 41/3024 binary64) (.f64 (.f64 b b) r)))))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) (.f64 (.f64 (*.f64 b b) b) r))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) (.f64 (.f64 (.f64 b b) b) (+.f64 r (.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) (.f64 (.f64 (.f64 b b) b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal 13/120 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* (pow (pow (sin b) 2) 3/2) r) (.f64 (.f64 (.f64 b b) b) (+.f64 r (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 13/120 binary64) r))))))))
#s(approx (pow (pow (sin b) 2) 3/2) (.f64 (.f64 b b) b))
#s(approx (pow (pow (sin b) 2) 3/2) (.f64 (.f64 (.f64 b b) b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (pow (pow (sin b) 2) 3/2) (.f64 (.f64 (.f64 b b) b) (+.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 (pow (sin b) 2) 3/2) (.f64 (.f64 (.f64 b b) b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 13/120 binary64) (.f64 #s(literal -41/3024 binary64) (*.f64 b b)))) #s(literal 1/2 binary64))))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(literal 1 binary64))
#s(approx (pow (pow (cos b) 2) 3/2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -3/2 binary64) (.f64 b b))))
#s(approx (pow (pow (cos b) 2) 3/2) (+.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 (pow (cos b) 2) 3/2) (+.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 (pow (cos b) 2) #s(literal 1 binary64))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 b b))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 b b)) #s(literal 1 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 b b)))) #s(literal 1 binary64)))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r)))))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))
#s(approx (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) (.f64 #s(literal -1/2 binary64) (.f64 b r)))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (/ (* -1/2 (* (sin b) r)) (cos b)) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/5040 binary64) r) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (.f64 #s(literal 1/24 binary64) r)))) (fma.f64 #s(literal -1/720 binary64) r (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r)))))))))))
#s(approx (* -1/2 (* (sin b) r)) (.f64 #s(literal -1/2 binary64) (.f64 b r)))
#s(approx (* -1/2 (* (sin b) r)) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 #s(literal 1/12 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* -1/2 (* (sin b) r)) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -1/240 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 1/12 binary64) r))))))
#s(approx (* -1/2 (* (sin b) r)) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/12 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -1/240 binary64) r (.f64 #s(literal 1/10080 binary64) (.f64 (.f64 b b) r)))))))))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) r)))))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* (sin b) r) (.f64 b (+.f64 r (.f64 (.f64 b b) (+.f64 (.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 (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (.f64 #s(literal -1/2 binary64) (.f64 b r)))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 5/6 binary64) r)) r)))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) r) (+.f64 (.f64 #s(literal 5/6 binary64) r) (.f64 (.f64 b b) (-.f64 (+.f64 r (.f64 #s(literal -17/30 binary64) r)) (fma.f64 #s(literal -2 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 5/6 binary64) r)) r) (.f64 #s(literal -5/6 binary64) r)))))) r)))))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 5/6 binary64) r (.f64 (.f64 b b) (-.f64 (+.f64 r (+.f64 (.f64 #s(literal -17/30 binary64) r) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -2/5 binary64) r (.f64 #s(literal 13/63 binary64) r)) (fma.f64 #s(literal -2 binary64) (-.f64 (+.f64 r (.f64 #s(literal -17/30 binary64) r)) (fma.f64 #s(literal -2 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 5/6 binary64) r)) r) (.f64 #s(literal -5/6 binary64) r))) (fma.f64 #s(literal 17/45 binary64) r (.f64 #s(literal 5/3 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 5/6 binary64) r)) r)))))))) (fma.f64 #s(literal -2 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) r (.f64 #s(literal 5/6 binary64) r)) r) (.f64 #s(literal -5/6 binary64) r)))))) r)))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (.f64 #s(literal -1/2 binary64) (.f64 b r)))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 5/6 binary64) r))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) r) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1 binary64) r) (+.f64 (.f64 #s(literal 5/6 binary64) r) (.f64 (.f64 b b) (+.f64 r (*.f64 #s(literal -17/30 binary64) r)))))))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (.f64 b (fma.f64 #s(literal -1/2 binary64) r (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal 5/6 binary64) r (.f64 (.f64 b b) (+.f64 r (+.f64 (.f64 #s(literal -17/30 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -2/5 binary64) r (*.f64 #s(literal 13/63 binary64) r))))))))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) r)))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) r (.f64 (*.f64 b b) r))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (.f64 (.f64 (.f64 b b) b) (+.f64 (.f64 #s(literal -1 binary64) r) (.f64 (.f64 b b) (+.f64 r (.f64 #s(literal -2/5 binary64) (.f64 (*.f64 b b) r)))))))
#s(approx (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r))) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) r (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (fma.f64 #s(literal -2/5 binary64) r (.f64 #s(literal 17/189 binary64) (.f64 (.f64 b b) r)))))))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) #s(literal 1 binary64))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (.f64 b b))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 5/3 binary64) (.f64 b b)) #s(literal 2 binary64)))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 5/3 binary64) (.f64 #s(literal -34/45 binary64) (.f64 b b)))) #s(literal 2 binary64)))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (.f64 (.f64 b b) r))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (+.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2))) (.f64 (.f64 b b) (+.f64 r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2/45 binary64) r (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/315 binary64) r) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 2/45 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r)))) (fma.f64 #s(literal -2/45 binary64) r (.f64 #s(literal 1/3 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal -1/3 binary64) r) (.f64 #s(literal -1 binary64) r)) (.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (* 2 (* (pow (sin b) 2) r)) (.f64 #s(literal 2 binary64) (.f64 (*.f64 b b) r)))
#s(approx (* 2 (* (pow (sin b) 2) r)) (.f64 (.f64 b b) (fma.f64 #s(literal -2/3 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 2 binary64) r))))
#s(approx (* 2 (* (pow (sin b) 2) r)) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 2 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -2/3 binary64) r (.f64 #s(literal 4/45 binary64) (.f64 (.f64 b b) r)))))))
#s(approx (* 2 (* (pow (sin b) 2) r)) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 2 binary64) r) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -2/3 binary64) r) (.f64 (.f64 b b) (fma.f64 #s(literal -2/315 binary64) (.f64 (.f64 b b) r) (*.f64 #s(literal 4/45 binary64) r))))))))
#s(approx (* 2 (pow (cos b) 2)) #s(literal 2 binary64))
#s(approx (* 2 (pow (cos b) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 b b))))
#s(approx (* 2 (pow (cos b) 2)) (+.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2/3 binary64) (.f64 b b)) #s(literal 2 binary64)))))
#s(approx (* 2 (pow (cos b) 2)) (+.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 2/3 binary64) (.f64 #s(literal -4/45 binary64) (.f64 b b)))) #s(literal 2 binary64)))))
#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) (+.f64 (.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 (tan b) b)
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 2/15 binary64) (*.f64 b b)))))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 b b) (+.f64 #s(literal 2/15 binary64) (.f64 #s(literal 17/315 binary64) (*.f64 b b)))))))))
#s(approx (* r (/ (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 (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 #s(literal -1/2 binary64) (*.f64 b (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 (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 (/ (* 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 (.f64 (.f64 b b) b) (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 (.f64 (.f64 b b) b) (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 (.f64 (.f64 b b) b) (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 (+ (* (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) a) (* r (tan b))) (fma.f64 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 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 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 #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)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (- (* (* -1 a) (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))))) (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2)))) a) (/ (* 2 (* (pow (sin b) 2) r)) (* 2 (pow (cos b) 2)))) (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 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 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 #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)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (/ -1/2 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))))) (fma.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))) (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 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (/ -1/2 (cos b)) (/.f64 #s(literal -1/2 binary64) (cos.f64 b)))
#s(approx (pow (sin b) 2) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (/ 1/6 (cos b)) (/ (* (pow (sin b) 2) r) (cos b))) (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b)))) (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))) (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))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (/ 1/6 (cos b)) (/.f64 #s(literal 1/6 binary64) (cos.f64 b)))
#s(approx (+ (/ (* (/ (* -1 (* (pow (pow (sin b) 2) 3/2) r)) (pow (pow (cos b) 2) 3/2)) (sin b)) (cos b)) (/ (* (/ (* -1/2 (* (sin b) r)) (cos b)) (sin b)) (cos b))) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (pow (pow (sin b) 2) 3/2) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (pow (pow (cos b) 2) 3/2) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (/ (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (* (cos b) (pow (pow (cos b) 2) 3/2))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 r (.f64 (cos.f64 b) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 r (*.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (+ (* (* -1/2 (* (sin b) r)) (pow (pow (cos b) 2) 3/2)) (* (cos b) (* -1 (* (pow (pow (sin b) 2) 3/2) r)))) (fma.f64 #s(literal -1 binary64) (.f64 r (.f64 (cos.f64 b) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 r (*.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (sin.f64 b))))))
#s(approx (* (cos b) (pow (pow (cos b) 2) 3/2)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (* 2 (pow (cos b) 2)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) 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 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))

eval379.0ms (4.2%)

Memory: 10.6MiB live, 528.1MiB allocated; 104ms collecting garbage
Compiler: Compiled 147 823 to 8 122 computations (94.5% saved)

prune812.0ms (9.1%)

Memory

-3.4MiB live, 816.4MiB allocated; 188ms collecting garbage

Pruning

10 alts after pruning (7 fresh and 3 done)

	Pruned	Kept	Total
New	1 433	7	1 440
Fresh	1	0	1
Picked	2	3	5
Done	0	0	0
Total	1 436	10	1 446

Accuracy

99.9%

Counts

1 446 → 10

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)) (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 (pow.f64 (.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)) (+.f64 (.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 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.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 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (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))))
▶	99.5%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶	45.5%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
▶	71.7%	#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))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
✓	59.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b))))

Compiler

Compiled 1 113 to 476 computations (57.2% saved)

series256.0ms (2.9%)

Memory

36.1MiB live, 415.2MiB allocated; 68ms collecting garbage

Counts

72 → 472

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
67.0ms	a	@	inf	((* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (sin b) b (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (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) 2) (pow (cos b) 2)) (pow (cos a) 2) 2 (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (pow (cos a) 3) 3 (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (/ (pow (sin a) 2) (pow (cos a) 3)) (* 1/6 (pow (cos a) -1)) 1/6 (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) -1/2 (/ (sin a) (pow (cos a) 2)) (* 1/6 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (sin a) (pow (cos a) 2))) (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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)))))
22.0ms	r	@	0	((* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (sin b) b (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (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) 2) (pow (cos b) 2)) (pow (cos a) 2) 2 (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (pow (cos a) 3) 3 (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (/ (pow (sin a) 2) (pow (cos a) 3)) (* 1/6 (pow (cos a) -1)) 1/6 (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) -1/2 (/ (sin a) (pow (cos a) 2)) (* 1/6 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (sin a) (pow (cos a) 2))) (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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)))))
21.0ms	a	@	-inf	((* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (sin b) b (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (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) 2) (pow (cos b) 2)) (pow (cos a) 2) 2 (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (pow (cos a) 3) 3 (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (/ (pow (sin a) 2) (pow (cos a) 3)) (* 1/6 (pow (cos a) -1)) 1/6 (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) -1/2 (/ (sin a) (pow (cos a) 2)) (* 1/6 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (sin a) (pow (cos a) 2))) (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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)))))
20.0ms	b	@	inf	((* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (sin b) b (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (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) 2) (pow (cos b) 2)) (pow (cos a) 2) 2 (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (pow (cos a) 3) 3 (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (/ (pow (sin a) 2) (pow (cos a) 3)) (* 1/6 (pow (cos a) -1)) 1/6 (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) -1/2 (/ (sin a) (pow (cos a) 2)) (* 1/6 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (sin a) (pow (cos a) 2))) (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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)))))
19.0ms	b	@	-inf	((* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (sin b) b (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (cos a) a (cos b) (* (sin a) (sin b)) (sin a) (/ (* r (sin b)) (/ (- (* (* (cos a) (cos b)) (* (cos a) (cos b))) (* (* (sin a) (sin b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (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) 2) (pow (cos b) 2)) (pow (cos a) 2) 2 (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (pow (sin b) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (pow (cos a) 3) 3 (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (/ (pow (sin a) 2) (pow (cos a) 3)) (* 1/6 (pow (cos a) -1)) 1/6 (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) -1/2 (/ (sin a) (pow (cos a) 2)) (* 1/6 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (sin a) (pow (cos a) 2))) (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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)))))

rewrite323.0ms (3.6%)

Memory

3.4MiB live, 368.5MiB allocated; 120ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2250	28587
0	2423	26002
0	9477	25519

Stop Event

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

Counts

544 → 646

Calls

Call 1

Inputs
(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
r
(/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(sin.f64 b)
b
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
a
(cos.f64 b)
(*.f64 (sin.f64 a) (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (/ (- (* (* (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) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
(/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
(.f64 (sin.f64 b) (fma.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)))
(-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(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) (sin b)) 3)) (+ (* (* (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))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
(/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
(.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))
(.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
(fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
(.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
(fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
(fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
#s(literal -1 binary64)
(.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))
(.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
(/.f64 (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(literal 1/6 binary64)
(fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(literal -1/2 binary64)
(/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 r (sin.f64 b))
(-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* r (* (sin b) (+ (* (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))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #s(hole binary64 (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (* r (/ (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)) (* (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)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* 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(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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 a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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 a) (sin b))))) #s(hole binary64 (* r (* (cos b) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (cos 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 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 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 a) (sin b)))) #s(hole binary64 (* (cos b) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (cos 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 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 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 (+ (* (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 (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (* (pow (cos a) 2) (pow (cos b) 2)) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (* (pow (cos a) 2) (pow (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) 2) (pow (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 (cos a) 2) #s(hole binary64 1))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (pow (cos a) 2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (* (pow (sin a) 2) (pow (sin b) 2)) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (* (pow (sin a) 2) (pow (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) 2) (pow (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) 2) (pow (sin b) 2)) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (pow (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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* 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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/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 a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (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(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (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(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* (cos b) (sin b)))) (* (cos b) (sin b))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* 1/120 (* (pow a 2) (* (cos b) (sin b))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* (cos b) (sin b)))) (* 1/120 (* (cos b) (sin b)))))))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #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 (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) #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 (pow (cos b) 2) 3/2)) #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 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) #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 (pow (sin b) 2) 3/2)) #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 (pow (sin b) 2) 3/2)) #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 (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (+ (* a (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (+ (* a (+ (* a (* b (+ 1/2 (* 7/6 (pow b 2))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (pow b 2) (+ 5/6 (* 14/9 (pow b 2))))) (* b (+ 1/2 (* 7/6 (pow b 2)))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (* b (+ 1 (* 2/3 (pow b 2)))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (* 7/6 (pow b 2)))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (+ (* 7/6 (pow b 2)) (* a (* b (+ 5/6 (* 14/9 (pow b 2)))))))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* 1/3 b)))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (* 2/3 (pow b 2)))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* 7/6 (* a b))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* a (+ (* 7/6 b) (* a (+ 5/6 (* 14/9 (pow b 2))))))))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* 1/3 b)))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (+ (* 1/3 b) (* 2/3 (* a (pow b 2))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (+ (* 1/3 b) (* a (+ (* 2/3 (pow b 2)) (* 7/6 (* a b)))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (+ (* 1/3 b) (* a (+ (* 2/3 (pow b 2)) (* a (+ (* 7/6 b) (* 14/9 (* a (pow b 2))))))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 1/3))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (+ 1/3 (* 2/3 (* a b)))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* 7/6 a))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* a (+ 7/6 (* 14/9 (* a b)))))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 1/2))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (+ 1/2 (* 2/3 (* a b)))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (+ 1/2 (* a (+ (* 1/4 a) (* 2/3 b))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (+ 1/2 (* a (+ (* 2/3 b) (* a (+ 1/4 (* 14/9 (* a b)))))))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) #s(hole binary64 (* -2/3 (* a b))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) #s(hole binary64 (* a (+ (* -14/9 (* (pow a 2) b)) (* -2/3 b)))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) #s(hole binary64 (* a (+ (* -2/3 b) (* (pow a 2) (+ (* -331/180 (* (pow a 2) b)) (* -14/9 b)))))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) #s(hole binary64 (* a (+ (* -2/3 b) (* (pow a 2) (+ (* -14/9 b) (* (pow a 2) (+ (* -331/180 b) (* -3071/1890 (* (pow a 2) b))))))))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) #s(hole binary64 (* -2/3 a)))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) #s(hole binary64 (* a (- (* -14/9 (pow a 2)) 2/3))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) #s(hole binary64 (* a (- (* (pow a 2) (- (* -331/180 (pow a 2)) 14/9)) 2/3))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) #s(hole binary64 (* a (- (* (pow a 2) (- (* (pow a 2) (- (* -3071/1890 (pow a 2)) 331/180)) 14/9)) 2/3))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) #s(hole binary64 (* 1/3 a)))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) #s(hole binary64 (* a (+ 1/3 (* 23/18 (pow a 2))))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* 601/360 (pow a 2))))))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* (pow a 2) (+ 601/360 (* 23183/15120 (pow a 2))))))))))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* 1/3 a)))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* a (+ 1/3 (* 10/9 (pow a 2))))))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* 47/45 (pow a 2))))))))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* (pow a 2) (+ 47/45 (* 142/189 (pow a 2))))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 1/3))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (+ 1/3 (* 7/6 (pow a 2)))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* 89/72 (pow a 2)))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 89/72 (* 2047/2160 (pow a 2)))))))))
#s(approx (* 1/2 (pow (cos a) -1)) #s(hole binary64 1/2))
#s(approx (* 1/2 (pow (cos a) -1)) #s(hole binary64 (+ 1/2 (* 1/4 (pow a 2)))))
#s(approx (* 1/2 (pow (cos a) -1)) #s(hole binary64 (+ 1/2 (* (pow a 2) (+ 1/4 (* 5/48 (pow a 2)))))))
#s(approx (* 1/2 (pow (cos a) -1)) #s(hole binary64 (+ 1/2 (* (pow a 2) (+ 1/4 (* (pow a 2) (+ 5/48 (* 61/1440 (pow a 2)))))))))
#s(approx (pow (cos a) -1) #s(hole binary64 1))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) #s(hole binary64 1/6))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) #s(hole binary64 (+ 1/6 (* -11/12 (pow a 2)))))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* -163/144 (pow a 2)) 11/12)))))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* (pow a 2) (- (* -3911/4320 (pow a 2)) 163/144)) 11/12)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (pow a 2)))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* 7/6 (pow a 2))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* 331/360 (pow a 2))))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 331/360 (* 3071/5040 (pow a 2))))))))))
#s(approx (* 1/6 (pow (cos a) -1)) #s(hole binary64 1/6))
#s(approx (* 1/6 (pow (cos a) -1)) #s(hole binary64 (+ 1/6 (* 1/12 (pow a 2)))))
#s(approx (* 1/6 (pow (cos a) -1)) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* 5/144 (pow a 2)))))))
#s(approx (* 1/6 (pow (cos a) -1)) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* (pow a 2) (+ 5/144 (* 61/4320 (pow a 2)))))))))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* -1/3 a)))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* a (- (* -5/18 (pow a 2)) 1/3))))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* a (- (* (pow a 2) (- (* -61/360 (pow a 2)) 5/18)) 1/3))))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* a (- (* (pow a 2) (- (* (pow a 2) (- (* -277/3024 (pow a 2)) 61/360)) 5/18)) 1/3))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 a))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* 1/6 a)))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1/6 (* 5/36 (pow a 2))))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1/6 (* (pow a 2) (+ 5/36 (* 61/720 (pow a 2))))))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (+ 1/6 (* (pow a 2) (+ 5/36 (* (pow a 2) (+ 61/720 (* 277/6048 (pow a 2))))))))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* -1 a)))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (- (* -5/6 (pow a 2)) 1))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (- (* (pow a 2) (- (* -61/120 (pow a 2)) 5/6)) 1))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* a (- (* (pow a 2) (- (* (pow a 2) (- (* -277/1008 (pow a 2)) 61/120)) 5/6)) 1))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #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) 2) (pow (cos 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)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (- (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (+ (* -1/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))) (pow (cos b) 2))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (/ (* r (* (sin b) (- (/ (pow (sin b) 3) (pow (cos b) 2)) (+ (* -1/6 (sin b)) (+ (* 1/2 (sin b)) (/ (* (sin b) (- (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (* -1/2 (cos b))))) (cos b))))))) (pow (cos b) 2)) (+ (/ (* r (* (pow (sin b) 2) (- (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (+ (* -1/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))) (pow (cos b) 3)) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (- (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (+ (* -1/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))) (pow (cos b) 2)))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (- (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (+ (* -1/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))) (pow (cos b) 2))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #s(hole binary64 (cos b)))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #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 (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -1 (cos b)) (* a (- (/ (pow (sin b) 3) (pow (cos b) 2)) (+ (* -1/6 (sin b)) (+ (* 1/2 (sin b)) (/ (* (sin b) (- (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (* -1/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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (cos b)))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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))))) (sin b))))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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))))) (cos b))))))) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (* -1/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 (/ (* (pow a 2) (pow (sin b) 2)) (cos b))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* a (pow (sin b) 3)) (pow (cos b) 2))) (/ (pow (sin b) 2) (cos b))))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* a (- (* a (- (* -1/3 (/ (pow (sin b) 2) (cos b))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 3))) (* -1/2 (/ (pow (sin b) 2) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 2)))) (/ (pow (sin b) 2) (cos b))))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1/6 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* 1/2 (/ (pow (sin b) 3) (pow (cos b) 2))) (/ (* (sin b) (- (* -1/3 (/ (pow (sin b) 2) (cos b))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 3))) (* -1/2 (/ (pow (sin b) 2) (cos b)))))) (cos b)))))) (* -1/3 (/ (pow (sin b) 2) (cos b)))) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 3))) (* -1/2 (/ (pow (sin b) 2) (cos b)))))) (/ (pow (sin b) 3) (pow (cos b) 2)))) (/ (pow (sin b) 2) (cos b))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (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 (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (cos b)) (* (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (pow (sin a) 2) (pow (sin b) 2)) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow (sin a) 2)))
#s(approx (* (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(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* (cos b) (* (sin a) (sin b)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #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 (pow (cos b) 2) 3/2)) #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 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) #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 b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a)))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a))))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) #s(hole binary64 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) #s(hole binary64 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) #s(hole binary64 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (* 1/2 (pow (cos a) -1)) #s(hole binary64 (/ 1/2 (cos a))))
#s(approx (pow (cos a) -1) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) #s(hole binary64 (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) #s(hole binary64 (/ (pow (sin a) 2) (pow (cos a) 3))))
#s(approx (* 1/6 (pow (cos a) -1)) #s(hole binary64 (/ 1/6 (cos a))))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* 1/6 (/ (sin a) (pow (cos a) 2)))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) #s(hole binary64 (* -1 (/ (sin a) (pow (cos a) 2)))))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #s(hole binary64 (- (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* (pow (sin a) 2) (pow (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 (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (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)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (cos a) (cos 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 a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* 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(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (* r (cos a)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (cos 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 a) (sin 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) (cos b)) (* (sin a) (sin 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) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (cos a))))
#s(approx (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (cos a) (* b (sin a))))))
#s(approx (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin 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) (cos b)) (* (sin a) (sin 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) (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 (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (pow (cos a) 2) (pow (cos b) 2)) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (* (pow (cos a) 2) (pow (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) 2) (pow (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 (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (* (pow (sin a) 2) (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (* (pow (sin a) 2) (pow (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) 2) (pow (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) 2) (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (pow (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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* 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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/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 a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (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(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (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(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (sin a))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (+ (* 1/12 (sin a)) (* (pow b 2) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) #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 (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) #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 (pow (cos b) 2) 3/2)) #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 (pow (cos b) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) #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 (pow (sin b) 2) 3/2)) #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 (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (pow b 3)))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (/ b (cos a))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* b (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (/ 1/2 (cos a))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (- (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (+ (* -1/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))) (pow (cos a) 2))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (/ (* (pow (cos a) 2) (pow (cos 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)))))) #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))) (/ (* r (- (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (+ (* -1/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))) (pow (cos a) 2))))) (cos a))) (+ (/ (* r (* (sin a) (- (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (+ (* -1/2 (cos a)) (/ (pow (sin a) 2) (cos a))))))) (pow (cos a) 3)) (/ (* r (- (/ (pow (sin a) 3) (pow (cos a) 2)) (+ (* -1/6 (sin a)) (+ (* 1/2 (sin a)) (/ (* (sin a) (- (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (* -1/2 (cos a))))) (cos a)))))) (pow (cos a) 2)))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (- (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (+ (* -1/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))) (pow (cos a) 2))))) (* -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 (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #s(hole binary64 (cos a)))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #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 (- (/ (* (pow (cos a) 2) (pow (cos 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))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -1 (cos a)) (* b (- (/ (pow (sin a) 3) (pow (cos a) 2)) (+ (* -1/6 (sin a)) (+ (* 1/2 (sin a)) (/ (* (sin a) (- (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (* -1/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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (cos a)))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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))))) (sin a))))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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))))) (cos a))))))) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (* -1/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 (/ (* (pow b 2) (pow (sin a) 2)) (cos a))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* b (pow (sin a) 3)) (pow (cos a) 2))) (/ (pow (sin a) 2) (cos a))))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* b (- (* b (- (* -1/3 (/ (pow (sin a) 2) (cos a))) (+ (* -1 (/ (pow (sin a) 4) (pow (cos a) 3))) (* -1/2 (/ (pow (sin a) 2) (cos a)))))) (/ (pow (sin a) 3) (pow (cos a) 2)))) (/ (pow (sin a) 2) (cos a))))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* 1/2 (/ (pow (sin a) 3) (pow (cos a) 2))) (/ (* (sin a) (- (* -1/3 (/ (pow (sin a) 2) (cos a))) (+ (* -1 (/ (pow (sin a) 4) (pow (cos a) 3))) (* -1/2 (/ (pow (sin a) 2) (cos a)))))) (cos a)))))) (* -1/3 (/ (pow (sin a) 2) (cos a)))) (+ (* -1 (/ (pow (sin a) 4) (pow (cos a) 3))) (* -1/2 (/ (pow (sin a) 2) (cos a)))))) (/ (pow (sin a) 3) (pow (cos a) 2)))) (/ (pow (sin a) 2) (cos a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (pow (pow (cos b) 2) 3/2) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (pow (sin b) 2) 3/2) #s(hole binary64 (pow (sin b) 3)))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* -1 (* (pow b 4) (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (/ 1/3 (* b (cos a)))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (/ 1/3 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (/ 1/3 (* b (cos a))) (+ (/ 1 (* (pow b 3) (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2)))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (/ 1/3 (* b (cos a)))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (/ 1/3 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (* (pow b 3) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (/ 1/3 (* b (cos a))) (/ 1 (* (pow b 3) (cos a))))) (+ (* -1 (/ (sin a) (* (pow b 2) (pow (cos a) 2)))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* (pow b 2) (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (/ 1/2 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (+ (/ 1/2 (* b (cos a))) (/ (sin a) (* (pow b 2) (pow (cos a) 2))))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* -1 (* (pow b 2) (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (/ 1/2 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (* b (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (/ 1/2 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (* b (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (* 1/2 (/ 1 (* b (cos a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* (pow b 4) (- (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (/ 1/2 (* b (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3)))) (/ 1/6 (* b (cos a))))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* (pow b 4) (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (* b (pow (cos a) 2))))) b))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) #s(hole binary64 (* (pow b 4) (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))) b))) b))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (cos a))) (/ (sin a) (* b (pow (cos a) 2)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (- (+ (* -1 (/ (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a)))) b)) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (* -1 (/ (+ (* -1 (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (* b (pow (cos a) 2))))) b))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) b)) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (* 1/2 (/ 1 (* b (cos a)))))))))

Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
r
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(sin.f64 b)
b
(/.f64 (neg.f64 (.f64 (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))))) (cos.f64 (+.f64 a b)))) (neg.f64 (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 (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))))) (cos.f64 (+.f64 a b))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
a
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(*.f64 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (cos.f64 (+.f64 a b))) #s(literal 2 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 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))) (neg.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
(/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
(.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (-.f64 (.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 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 (+.f64 a 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 (-.f64 (pow.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))
(-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.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))) (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 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)
(*.f64 (cos.f64 b) (cos.f64 b))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(.f64 (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 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)))
#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))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (.f64 (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))))) (cos.f64 (+.f64 a b)))))
(/.f64 (neg.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))) (neg.f64 (.f64 (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))))) (cos.f64 (+.f64 a b)))))
(/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (.f64 (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))))) (cos.f64 (+.f64 a b))))
(.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))
(.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (-.f64 (.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 (.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))))
(fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.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 (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 (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 (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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(+.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
(.f64 (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))))
(-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (cos.f64 b)))
(.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))))
(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 (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 (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 3 binary64)))
#s(literal 3/2 binary64)
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (sin.f64 a) (sin.f64 b)))
(.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))))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (sin.f64 a))
(*.f64 (sin.f64 a) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (sin.f64 b))
(*.f64 (sin.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 3 binary64)))
(.f64 r #s(approx (/ (sin b) (- ( (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
(.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (-.f64 (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (.f64 (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))) (fma.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
(-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.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)))) #s(literal 3 binary64))) (+.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (fma.f64 (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)))) (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 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))))
(-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))) (.f64 (.f64 #s(literal 1/2 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))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))) (-.f64 (.f64 (.f64 #s(literal 1/2 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)))) (.f64 (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
(fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
#s(literal -1 binary64)
(.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))) (-.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))) (neg.f64 (cos.f64 a)))
(/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))
(.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.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)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/2 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)))) (fma.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)))) (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 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 a)))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal -1 binary64)))
(/.f64 (-.f64 (.f64 (.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 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (-.f64 (.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 (+.f64 (pow.f64 (.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(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.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 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (.f64 (.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)))))))
(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 (.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 (neg.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
(/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
(*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(literal 1/6 binary64)
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (sin.f64 a)) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 r (sin.f64 b))) (neg.f64 (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (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 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (sin.f64 b))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (.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 (fma.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)))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (neg.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (neg.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a 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) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (/ (* 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)))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.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 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (.f64 (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))))) (cos.f64 (+.f64 a b)))))
#s(approx (/ (* 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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (.f64 (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))))) (cos.f64 (+.f64 a b)))))
#s(approx (* 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)))))) (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a 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)) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))))
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (* r (/ (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)) (* (sin a) (sin b))))) (/.f64 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (tan.f64 b))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (- (* (cos 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 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/6 binary64) (.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 a a))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 a a)) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 a a)))) #s(literal 1/2 binary64)))))
#s(approx a a)
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 a a) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (sin a) a)
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 a a)))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 a a)))) #s(literal 1/6 binary64))))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/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))))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #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 (*.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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #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 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* 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)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (/.f64 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (/ (* 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)))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #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 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* 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)))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #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 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 r (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (cos 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 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 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 a) (sin b)))) (*.f64 (cos.f64 b) (sin.f64 b)))
#s(approx (* (sin b) (+ (* (cos a) (cos 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 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 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 (+ (* (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 (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (* (pow (cos a) 2) (pow (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) 2) (pow (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) 2) (pow (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 (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 (* (pow (sin a) 2) (pow (sin b) 2)) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)))
#s(approx (* (pow (sin a) 2) (pow (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) 2) (pow (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) 2) (pow (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 (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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/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))))))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (/.f64 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (/ (* 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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (.f64 r (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (fma.f64 a (.f64 r (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 r (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (fma.f64 a (fma.f64 a (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 r (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 r (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (fma.f64 a (fma.f64 a (fma.f64 a (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))))) (.f64 r (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (.f64 r (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (fma.f64 a (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (fma.f64 a (fma.f64 a (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (fma.f64 a (fma.f64 a (fma.f64 a (.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b))))) (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 b) (sin.f64 b))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 b) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 b) (sin.f64 b)))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (.f64 (.f64 a a) (+.f64 (.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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 a (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 a (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (fma.f64 (.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (.f64 (.f64 (.f64 a a) a) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 a a) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (.f64 (.f64 (.f64 a a) a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 a a) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (.f64 (.f64 (.f64 a a) a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 a a) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
#s(approx (pow (sin a) 3) (.f64 (.f64 a a) a))
#s(approx (pow (sin a) 3) (.f64 (.f64 (.f64 a a) a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
#s(approx (pow (sin a) 3) (.f64 (.f64 (.f64 a a) a) (+.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 (.f64 (.f64 a a) a) (+.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 (* r (/ (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)) (* (sin a) (sin b))))) (/.f64 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (tan.f64 b))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (fma.f64 a (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b)))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 b b))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (fma.f64 a (fma.f64 a (.f64 b (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 7/6 binary64) (.f64 b b)))) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b))))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 b b))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (fma.f64 a (fma.f64 a (fma.f64 a (.f64 (.f64 b b) (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 b b)))) (.f64 b (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 7/6 binary64) (.f64 b b))))) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b))))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 b b))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 b b))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 b b) (.f64 a (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (*.f64 b b))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 b b) (.f64 a (fma.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 7/6 binary64) (.f64 b b))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (*.f64 b b)))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 b b) (.f64 a (fma.f64 a (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 7/6 binary64) (.f64 b b) (.f64 a (.f64 b (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 b b))))))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (.f64 b b)))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (*.f64 #s(literal 1/3 binary64) b))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2/3 binary64) (*.f64 b b))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2/3 binary64) (.f64 b b) (.f64 #s(literal 7/6 binary64) (.f64 a b)))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2/3 binary64) (.f64 b b) (.f64 a (fma.f64 #s(literal 7/6 binary64) b (.f64 a (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 b b)))))))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (*.f64 #s(literal 1/3 binary64) b))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (fma.f64 #s(literal 1/3 binary64) b (.f64 #s(literal 2/3 binary64) (.f64 a (*.f64 b b)))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (fma.f64 #s(literal 2/3 binary64) (.f64 b b) (.f64 #s(literal 7/6 binary64) (.f64 a b))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (fma.f64 #s(literal 1/3 binary64) b (.f64 a (fma.f64 #s(literal 2/3 binary64) (.f64 b b) (.f64 a (fma.f64 #s(literal 7/6 binary64) b (.f64 #s(literal 14/9 binary64) (.f64 a (.f64 b b)))))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(literal 1/3 binary64))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 2/3 binary64) (.f64 a b))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+.f64 #s(literal 1/3 binary64) (.f64 a (fma.f64 #s(literal 2/3 binary64) b (.f64 #s(literal 7/6 binary64) a)))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+.f64 #s(literal 1/3 binary64) (.f64 a (fma.f64 #s(literal 2/3 binary64) b (.f64 a (+.f64 #s(literal 7/6 binary64) (.f64 #s(literal 14/9 binary64) (.f64 a b))))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) #s(literal 1/2 binary64))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2/3 binary64) (.f64 a b))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) a (.f64 #s(literal 2/3 binary64) b)))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 a (fma.f64 #s(literal 2/3 binary64) b (.f64 a (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 14/9 binary64) (.f64 a b))))))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (.f64 #s(literal -2/3 binary64) (.f64 a b)))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (.f64 a (fma.f64 #s(literal -14/9 binary64) (.f64 (.f64 a a) b) (.f64 #s(literal -2/3 binary64) b))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (.f64 a (+.f64 (.f64 #s(literal -2/3 binary64) b) (.f64 (.f64 a a) (fma.f64 #s(literal -331/180 binary64) (.f64 (.f64 a a) b) (*.f64 #s(literal -14/9 binary64) b))))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (.f64 a (+.f64 (.f64 #s(literal -2/3 binary64) b) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -14/9 binary64) b) (.f64 (.f64 a a) (fma.f64 #s(literal -331/180 binary64) b (.f64 #s(literal -3071/1890 binary64) (.f64 (.f64 a a) b)))))))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (*.f64 #s(literal -2/3 binary64) a))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (.f64 a (-.f64 (.f64 #s(literal -14/9 binary64) (*.f64 a a)) #s(literal 2/3 binary64))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -331/180 binary64) (*.f64 a a)) #s(literal 14/9 binary64))) #s(literal 2/3 binary64))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -3071/1890 binary64) (*.f64 a a)) #s(literal 331/180 binary64))) #s(literal 14/9 binary64))) #s(literal 2/3 binary64))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (*.f64 #s(literal 1/3 binary64) a))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 23/18 binary64) (*.f64 a a)))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 23/18 binary64) (.f64 #s(literal 601/360 binary64) (*.f64 a a)))))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 23/18 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 601/360 binary64) (.f64 #s(literal 23183/15120 binary64) (*.f64 a a)))))))))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (*.f64 #s(literal 1/3 binary64) a))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 10/9 binary64) (*.f64 a a)))))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 10/9 binary64) (.f64 #s(literal 47/45 binary64) (*.f64 a a)))))))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 a (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 10/9 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 47/45 binary64) (.f64 #s(literal 142/189 binary64) (*.f64 a a)))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) #s(literal 1/3 binary64))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 7/6 binary64) (.f64 a a))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 #s(literal 89/72 binary64) (.f64 a a))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (+.f64 #s(literal 1/3 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 89/72 binary64) (.f64 #s(literal 2047/2160 binary64) (.f64 a a))))))))
#s(approx (* 1/2 (pow (cos a) -1)) #s(literal 1/2 binary64))
#s(approx (* 1/2 (pow (cos a) -1)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 a a))))
#s(approx (* 1/2 (pow (cos a) -1)) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 5/48 binary64) (.f64 a a))))))
#s(approx (* 1/2 (pow (cos a) -1)) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/48 binary64) (.f64 #s(literal 61/1440 binary64) (.f64 a a))))))))
#s(approx (pow (cos a) -1) #s(literal 1 binary64))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 a a))))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 5/24 binary64) (.f64 a a))))))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/24 binary64) (.f64 #s(literal 61/720 binary64) (.f64 a a))))))))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) #s(literal 1/6 binary64))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -11/12 binary64) (.f64 a a))))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -163/144 binary64) (.f64 a a)) #s(literal 11/12 binary64)))))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -3911/4320 binary64) (.f64 a a)) #s(literal 163/144 binary64))) #s(literal 11/12 binary64)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (*.f64 a a))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 7/6 binary64) (.f64 a a)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 #s(literal 331/360 binary64) (.f64 a a)))))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (.f64 (.f64 a a) (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 7/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 331/360 binary64) (.f64 #s(literal 3071/5040 binary64) (.f64 a a)))))))))
#s(approx (* 1/6 (pow (cos a) -1)) #s(literal 1/6 binary64))
#s(approx (* 1/6 (pow (cos a) -1)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal 1/12 binary64) (.f64 a a))))
#s(approx (* 1/6 (pow (cos a) -1)) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/12 binary64) (.f64 #s(literal 5/144 binary64) (.f64 a a))))))
#s(approx (* 1/6 (pow (cos a) -1)) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/12 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/144 binary64) (.f64 #s(literal 61/4320 binary64) (.f64 a a))))))))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) (*.f64 #s(literal -1/3 binary64) a))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) (.f64 a (-.f64 (.f64 #s(literal -5/18 binary64) (*.f64 a a)) #s(literal 1/3 binary64))))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -61/360 binary64) (*.f64 a a)) #s(literal 5/18 binary64))) #s(literal 1/3 binary64))))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -277/3024 binary64) (*.f64 a a)) #s(literal 61/360 binary64))) #s(literal 5/18 binary64))) #s(literal 1/3 binary64))))
#s(approx (/ (sin a) (pow (cos a) 2)) a)
#s(approx (/ (sin a) (pow (cos a) 2)) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal 5/6 binary64) (*.f64 a a)))))
#s(approx (/ (sin a) (pow (cos a) 2)) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/6 binary64) (.f64 #s(literal 61/120 binary64) (*.f64 a a)))))))
#s(approx (/ (sin a) (pow (cos a) 2)) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 61/120 binary64) (.f64 #s(literal 277/1008 binary64) (*.f64 a a)))))))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) (*.f64 #s(literal 1/6 binary64) a))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) (.f64 a (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal 5/36 binary64) (*.f64 a a)))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) (.f64 a (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/36 binary64) (.f64 #s(literal 61/720 binary64) (*.f64 a a)))))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) (.f64 a (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 5/36 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 61/720 binary64) (.f64 #s(literal 277/6048 binary64) (*.f64 a a)))))))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) (*.f64 #s(literal -1 binary64) a))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) (.f64 a (-.f64 (.f64 #s(literal -5/6 binary64) (*.f64 a a)) #s(literal 1 binary64))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -61/120 binary64) (*.f64 a a)) #s(literal 5/6 binary64))) #s(literal 1 binary64))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) (.f64 a (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -277/1008 binary64) (*.f64 a a)) #s(literal 61/120 binary64))) #s(literal 5/6 binary64))) #s(literal 1 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 (fma.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 r (sin.f64 b)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/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))))) (fma.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (.f64 r (.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))))))) (pow.f64 (cos.f64 b) #s(literal 2 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 (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (-.f64 (/.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (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)) (.f64 #s(literal -1/2 binary64) (cos.f64 b))))) (cos.f64 b))))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 r (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (-.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))))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (.f64 r (.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))))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (.f64 r (.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))))))) (pow.f64 (cos.f64 b) #s(literal 2 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 (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (cos.f64 b))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (+.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 (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (cos.f64 b) (.f64 a (-.f64 (/.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (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)) (.f64 #s(literal -1/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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (cos.f64 b))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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)) (.f64 #s(literal -1/2 binary64) (cos.f64 b))))) (sin.f64 b)))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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)) (.f64 #s(literal -1/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)) (.f64 #s(literal -1/2 binary64) (cos.f64 b))))) (sin.f64 b)))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)) (cos.f64 b)))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 (.f64 a a) (fma.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (/.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 (.f64 a a) (fma.f64 a (-.f64 (.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b))))) (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (/.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (+ (* (cos a) (cos b)) (* (sin a) (sin b))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (* (pow (cos a) 2) (pow (cos b) 2)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (cos a) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (* (pow (sin a) 2) (pow (sin b) 2)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
#s(approx (pow (sin a) 2) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))
#s(approx (* (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))))) (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (.f64 (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))))) (cos.f64 (+.f64 a b))))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (cos a) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (sin a) 3) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))))) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
#s(approx (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a)) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))
#s(approx (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (* 1/2 (pow (cos a) -1)) (/.f64 #s(literal 1/2 binary64) (cos.f64 a)))
#s(approx (pow (cos a) -1) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (pow (sin a) 2) (pow (cos a) 3)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* 1/6 (pow (cos a) -1)) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))
#s(approx (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin a) (pow (cos a) 2)) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* 1/6 (/ (sin a) (pow (cos a) 2))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* -1 (/ (sin a) (pow (cos a) 2))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (* r (/ (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)) (* (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)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (sin b) b)
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx b b)
#s(approx (- (* (cos 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 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/6 binary64) (.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 b b))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 b b)))) #s(literal 1/2 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 b b) (sin.f64 a)) (.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (/ (* r (sin b)) (/ (- (* (* (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) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* 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)))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) (cos b)) (* (sin a) (sin b))))) (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) (cos b)) (* (sin a) (sin b))))) (.f64 b (.f64 r (cos.f64 a))))
#s(approx (* r (* (sin b) (+ (* (cos a) (cos 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 a) (sin 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) (cos b)) (* (sin a) (sin 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) (cos b)) (* (sin a) (sin b)))) (*.f64 b (cos.f64 a)))
#s(approx (* (sin b) (+ (* (cos a) (cos 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 a) (sin 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) (cos b)) (* (sin a) (sin 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 (+ (* (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 (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (- (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (* (pow (cos a) 2) (pow (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) 2) (pow (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) 2) (pow (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 (cos b) 2) #s(literal 1 binary64))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 b b))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 b b)) #s(literal 1 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 b b)))) #s(literal 1 binary64)))))
#s(approx (* (pow (sin a) 2) (pow (sin b) 2)) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)))
#s(approx (* (pow (sin a) 2) (pow (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) 2) (pow (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) 2) (pow (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 (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)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (/ (* 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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* 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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/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 a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (.f64 b (.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (.f64 b (fma.f64 b (.f64 r (.f64 (cos.f64 a) (sin.f64 a))) (.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (.f64 b (fma.f64 b (fma.f64 b (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (.f64 r (.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 b (.f64 r (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (.f64 r (.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (.f64 b (fma.f64 b (.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 a) (sin.f64 a)) (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (sin.f64 a)))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (.f64 b (+.f64 (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (fma.f64 #s(literal 1/12 binary64) (sin.f64 a) (.f64 (.f64 b b) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (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) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (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 (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (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) 3) (pow (pow (cos b) 2) 3/2)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (* (pow (cos a) 3) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos b) 2) 3/2)) (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) 3) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos b) 2) 3/2) #s(literal 1 binary64))
#s(approx (pow (pow (cos b) 2) 3/2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -3/2 binary64) (.f64 b b))))
#s(approx (pow (pow (cos b) 2) 3/2) (+.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 (pow (cos b) 2) 3/2) (+.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 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (.f64 (.f64 (.f64 b b) b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (.f64 (.f64 (.f64 b b) b) (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 (pow (sin b) 2) 3/2) (.f64 (.f64 b b) b))
#s(approx (pow (pow (sin b) 2) 3/2) (.f64 (.f64 (.f64 b b) b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (pow (pow (sin b) 2) 3/2) (.f64 (.f64 (.f64 b b) b) (+.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 (pow (sin b) 2) 3/2) (.f64 (.f64 (.f64 b b) b) (+.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 (* r (/ (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)) (* (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)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (/.f64 b (cos.f64 a)))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (fma.f64 b (fma.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (/.f64 #s(literal 1/2 binary64) (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 (*.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 (-.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 (.f64 r (-.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)))))) (pow.f64 (cos.f64 a) #s(literal 2 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 (-.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 (.f64 r (-.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)))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (cos.f64 a)) (/.f64 (fma.f64 (.f64 r (.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))))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (.f64 r (-.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/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)) (.f64 #s(literal -1/2 binary64) (cos.f64 a))))) (cos.f64 a)))))))) (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (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 (.f64 r (-.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)))))) (pow.f64 (cos.f64 a) #s(literal 2 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)) (*.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) (+.f64 (.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 (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (cos.f64 a))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (+.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 (- (/ (* (pow (cos a) 2) (pow (cos 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))))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 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/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)) (.f64 #s(literal -1/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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (cos.f64 a))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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)) (.f64 #s(literal -1/2 binary64) (cos.f64 a))))) (sin.f64 a)))))
#s(approx (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (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)) (.f64 #s(literal -1/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)) (.f64 #s(literal -1/2 binary64) (cos.f64 a))))) (sin.f64 a)))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)) (cos.f64 a)))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 (.f64 b b) (fma.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (.f64 (.f64 b b) (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1/6 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/2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a))))) (.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (pow (sin b) 2) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
#s(approx (pow (pow (cos b) 2) 3/2) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (pow (pow (sin b) 2) 3/2) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 b b) b) (cos.f64 a)) (sin.f64 a))) (.f64 (.f64 (.f64 (.f64 b b) b) (cos.f64 a)) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (.f64 (.f64 (.f64 b b) b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (.f64 (.f64 (.f64 b b) b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (.f64 (.f64 (.f64 b b) b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 (.f64 b b) b) (cos.f64 a)) (.f64 (.f64 b (cos.f64 a)) #s(literal 1 binary64))) (.f64 (.f64 b (cos.f64 a)) (.f64 (.f64 (.f64 b b) b) (cos.f64 a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (.f64 b (cos.f64 a)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 a)))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))))
#s(approx (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 a)))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal -1 binary64))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (/.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 a)))))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)))))
#s(approx (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 a)) #s(literal -1 binary64)) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b))) b)))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (sin.f64 a) (.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))))
#s(approx (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (pow (cos a) -1)) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (.f64 b (cos.f64 a)) #s(literal -1 binary64))) b) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))))
#s(approx (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (* -1 (/ (sin a) (pow (cos a) 2)))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)))))
#s(approx (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1)))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (pow (cos a) -1)) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (pow (cos a) -1))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (pow (cos a) -1))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 b (cos.f64 a)) #s(literal -1 binary64)))))))

eval295.0ms (3.3%)

Memory: -6.2MiB live, 462.1MiB allocated; 89ms collecting garbage
Compiler: Compiled 149 172 to 8 831 computations (94.1% saved)

prune713.0ms (8%)

Memory

-1.7MiB live, 852.0MiB allocated; 140ms collecting garbage

Pruning

11 alts after pruning (5 fresh and 6 done)

	Pruned	Kept	Total
New	1 479	4	1 483
Fresh	1	1	2
Picked	2	3	5
Done	0	3	3
Total	1 482	11	1 493

Accuracy

100.0%

Counts

1 493 → 11

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.3%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))))))
✓	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (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 (pow.f64 (.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)) (+.f64 (.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.5%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
✓	45.5%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
▶	88.6%	#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
▶	71.7%	#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))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (.f64 (sin.f64 b) (fma.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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 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 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
✓	59.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b))))

Compiler

Compiled 1 475 to 528 computations (64.2% saved)

series247.0ms (2.8%)

Memory

10.0MiB live, 252.9MiB allocated; 58ms collecting garbage

Counts

64 → 456

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

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

Calls

9 calls:

Time	Variable		Point	Expression
33.0ms	a	@	0	((/ (* 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))))))) (* r (sin b)) r (sin b) 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)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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)) (pow (sin a) 2) 2 (pow (sin b) 2) (* (* (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 a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2))) (pow (* (cos a) (cos b)) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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) 2) (pow (cos b) 2) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 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 (pow (sin b) 2) 3/2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (/ (* r (sin b)) (/ (- (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (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 (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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))))))
25.0ms	a	@	-inf	((/ (* 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))))))) (* r (sin b)) r (sin b) 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)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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)) (pow (sin a) 2) 2 (pow (sin b) 2) (* (* (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 a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2))) (pow (* (cos a) (cos b)) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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) 2) (pow (cos b) 2) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 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 (pow (sin b) 2) 3/2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (/ (* r (sin b)) (/ (- (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (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 (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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))))))
24.0ms	b	@	inf	((/ (* 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))))))) (* r (sin b)) r (sin b) 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)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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)) (pow (sin a) 2) 2 (pow (sin b) 2) (* (* (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 a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2))) (pow (* (cos a) (cos b)) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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) 2) (pow (cos b) 2) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 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 (pow (sin b) 2) 3/2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (/ (* r (sin b)) (/ (- (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (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 (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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))))))
22.0ms	b	@	-inf	((/ (* 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))))))) (* r (sin b)) r (sin b) 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)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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)) (pow (sin a) 2) 2 (pow (sin b) 2) (* (* (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 a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2))) (pow (* (cos a) (cos b)) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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) 2) (pow (cos b) 2) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 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 (pow (sin b) 2) 3/2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (/ (* r (sin b)) (/ (- (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (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 (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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))))))
22.0ms	a	@	inf	((/ (* 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))))))) (* r (sin b)) r (sin b) 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)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos a) a (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (+ (* (* (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)) (pow (sin a) 2) 2 (pow (sin b) 2) (* (* (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 a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2)))) (* r (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (sin b) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (cos a) (cos b)) (* (sin a) (sin b))) (- (pow (* (cos a) (cos b)) 2) (* (pow (sin a) 2) (pow (sin b) 2))) (pow (* (cos a) (cos b)) 2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)))) (* 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)))))) (* (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))))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))) (* (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) 2) (pow (cos b) 2) (- (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2)) (* (pow (cos a) 2) (cos a)) (pow (pow (cos b) 2) 3/2) 3/2 (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (pow (pow (sin b) 2) 3/2) (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 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 (pow (sin b) 2) 3/2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (/ (* r (sin b)) (/ (- (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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 (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3)) (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (/ (* (pow (sin a) 2) (pow (sin b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (* (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (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 (cos a) 2) (pow (cos 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 (cos a) 2) (pow (cos 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))))))

rewrite310.0ms (3.5%)

Memory

-0.5MiB live, 237.5MiB allocated; 37ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2267	33415
0	2431	27993
0	8146	26924

Stop Event

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

Counts

520 → 649

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

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

eval521.0ms (5.8%)

Memory: 35.5MiB live, 562.5MiB allocated; 204ms collecting garbage
Compiler: Compiled 317 711 to 9 090 computations (97.1% saved)

prune1.2s (12.9%)

Memory

0.3MiB live, 1 325.0MiB allocated; 160ms collecting garbage

Pruning

12 alts after pruning (3 fresh and 9 done)

	Pruned	Kept	Total
New	2 188	3	2 191
Fresh	0	0	0
Picked	1	4	5
Done	1	5	6
Total	2 190	12	2 202

Accuracy

100.0%

Counts

2 202 → 12

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.3%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))))))
	74.2%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)) (-.f64 (.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 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))))))))
	99.0%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) #s(approx (+ ( (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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))))))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 (fma.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))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (.f64 (fma.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)))))))))
✓	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.5%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
✓	45.5%	(.f64 r #s(approx (/ (sin b) (cos (+ a b))) (.f64 b (fma.f64 b (-.f64 (.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
	99.2%	#s(approx (/ (* r (sin b)) (/ (- (pow (/ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) 3) (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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (pow (cos a) 2) (pow (cos 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)) (+ (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (/ (* (pow (cos a) 2) (pow (cos 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))))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (.f64 (fma.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))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (.f64 (fma.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)))))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (pow.f64 (sin.f64 b) #s(literal 6 binary64)))) (.f64 (.f64 (fma.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)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))))
✓	88.6%	#s(approx (/ (* r (sin b)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (.f64 r (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (.f64 (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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
✓	71.7%	#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))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 (.f64 (sin.f64 b) (fma.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 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 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 (.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
✓	59.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (.f64 r (tan.f64 b))))

Compiler

Compiled 3 713 to 730 computations (80.3% saved)

regimes35.0ms (0.4%)

Memory

-15.0MiB live, 39.2MiB allocated; 17ms collecting garbage

Counts

21 → 1

Calls

Call 1

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

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

Calls

4 calls:

15.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)

regimes13.0ms (0.1%)

Memory

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

Counts

9 → 1

Calls

Call 1

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

Calls

4 calls:

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

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)

regimes9.0ms (0.1%)

Memory

-34.7MiB live, 11.1MiB allocated; 5ms 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))) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) a) (fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (fma.f64 (/.f64 #s(literal 1/6 binary64) (cos.f64 b)) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (cos.f64 b)) (+.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (sin.f64 b)) (cos.f64 b)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (cos.f64 b)) (sin.f64 b)) (cos.f64 b)))))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) r)) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)) r)))) (*.f64 (cos.f64 b) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) a (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))

Outputs

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 12 to 17 computations (-41.7% saved)

simplify77.0ms (0.9%)

Memory

16.1MiB live, 62.5MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	79	230
1	152	230
2	414	230
3	1558	208
4	5916	208

Stop Event

1×	node limit

Calls

Call 1

Inputs

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

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

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

derivations107.0ms (1.2%)

Memory

24.6MiB live, 71.4MiB allocated; 3ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 233 to 80 computations (65.7% saved)

preprocess73.0ms (0.8%)

Memory: -24.7MiB live, 73.5MiB allocated; 11ms collecting garbage
Remove: (negabs r)
Compiler: Compiled 548 to 224 computations (59.1% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze270.0ms (3%)

sample2.2s (24.1%)

explain140.0ms (1.6%)

preprocess203.0ms (2.3%)

eval0.0ms (0%)

prune0.0ms (0%)

series17.0ms (0.2%)

rewrite204.0ms (2.3%)

eval14.0ms (0.2%)

prune22.0ms (0.2%)

series309.0ms (3.4%)

rewrite292.0ms (3.3%)

eval379.0ms (4.2%)

prune812.0ms (9.1%)

series256.0ms (2.9%)

rewrite323.0ms (3.6%)

eval295.0ms (3.3%)

prune713.0ms (8%)

series247.0ms (2.8%)

rewrite310.0ms (3.5%)

eval521.0ms (5.8%)

prune1.2s (12.9%)

regimes35.0ms (0.4%)

regimes13.0ms (0.1%)

regimes9.0ms (0.1%)

simplify77.0ms (0.9%)

derivations107.0ms (1.2%)

preprocess73.0ms (0.8%)

end0.0ms (0%)

Profiling