rsin B (should all be same)

Time bar (total: 9.1s)

start0.0ms (0%)

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

analyze297.0ms (3.3%)

Memory
-11.5MiB live, 258.5MiB allocated; 63ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
0%0%99.9%0.1%0%0%0%4
0%0%99.9%0.1%0%0%0%5
0%0%99.9%0.1%0%0%0%6
12.5%12.5%87.4%0.1%0%0%0%7
12.5%12.5%87.4%0.1%0%0%0%8
18.8%18.7%81.1%0.1%0%0%0%9
21.9%21.8%78%0.1%0%0%0%10
21.9%21.8%78%0.1%0%0%0%11
23.4%23.4%76.5%0.1%0%0%0%12
Compiler

Compiled 11 to 10 computations (9.1% saved)

sample1.9s (21.2%)

Memory
-29.5MiB live, 1 626.4MiB allocated; 882ms collecting garbage
Samples
1.4s6 058×1valid
149.0ms2 198×0valid
Precisions
Click to see histograms. Total time spent on operations: 945.0ms
ival-cos: 280.0ms (29.6% of total)
ival-sin: 209.0ms (22.1% of total)
adjust: 166.0ms (17.6% of total)
ival-add: 109.0ms (11.5% of total)
ival-mult: 103.0ms (10.9% of total)
ival-div: 75.0ms (7.9% of total)
ival-assert: 3.0ms (0.3% of total)
Bogosity

explain159.0ms (1.8%)

Memory
37.6MiB live, 138.1MiB allocated; 11ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
64134(3.456954268739464e+25 1.935834574494878e+61 7.268350029723887e-208)0-(cos.f64 (+.f64 a b))
00-0-(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
00-0-(+.f64 a b)
00-0-(sin.f64 b)
00-0-a
00-0-r
00-0-b
00-0-(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (+.f64 a b))sensitivity1980
Confusion
Predicted +Predicted -
+640
-13458
Precision
0.32323232323232326
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6400
-134058
Precision?
0.32323232323232326
Recall?
1.0
Freqs
test
numberfreq
058
1198
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
68.0ms394×1valid
34.0ms118×0valid
Compiler

Compiled 69 to 28 computations (59.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 54.0ms
ival-cos: 16.0ms (29.5% of total)
ival-sin: 12.0ms (22.1% of total)
adjust: 10.0ms (18.4% of total)
ival-mult: 6.0ms (11% of total)
ival-add: 5.0ms (9.2% of total)
ival-div: 4.0ms (7.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess222.0ms (2.4%)

Memory
-7.2MiB live, 140.8MiB allocated; 32ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03897
110397
220697
342897
477097
5163097
6349197
7651797
089
0139
1249
2419
3659
4849
51089
62069
78019
852839
082689
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (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.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶78.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Compiler

Compiled 9 to 8 computations (11.1% saved)

series29.0ms (0.3%)

Memory
-16.4MiB live, 29.0MiB allocated; 4ms collecting garbage
Counts
8 → 48
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
r
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(sin.f64 b)
b
(cos.f64 (+.f64 a b))
(+.f64 a b)
a
Outputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Calls

9 calls:

TimeVariablePointExpression
12.0ms
a
@0
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
3.0ms
b
@inf
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
b
@0
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
r
@0
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
a
@-inf
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)

rewrite217.0ms (2.4%)

Memory
7.7MiB live, 142.8MiB allocated; 36ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02831294
02901148
116521098
088211057
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
56 → 82
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
r
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(sin.f64 b)
b
(cos.f64 (+.f64 a b))
(+.f64 a b)
a
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Outputs
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 b) r))) (neg.f64 (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)))
r
(/.f64 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (cos.f64 (+.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 b)) (cos.f64 (+.f64 (+.f64 a b) (PI.f64))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (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 (*.f64 a a) a (*.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 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (fma.f64 (*.f64 a a) a (*.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 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 (/ (sin b) (cos (+ a b))) (tan.f64 b))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) a) (fma.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)) #s(literal -1 binary64) (*.f64 (tan.f64 b) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) a) (fma.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)) #s(literal -1 binary64) (*.f64 (tan.f64 b) #s(literal -1/2 binary64))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)) #s(literal -1 binary64) (*.f64 (tan.f64 b) #s(literal -1/2 binary64)))) a (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b)))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (fma.f64 (*.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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ a b) (*.f64 (*.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 (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (+.f64 (/.f64 (*.f64 (sin.f64 a) b) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 b b) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (fma.f64 (*.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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ a b) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 a b) #s(literal -1 binary64)) #s(literal 1 binary64)) b) #s(literal -1 binary64)))

eval12.0ms (0.1%)

Memory
16.7MiB live, 16.7MiB allocated; 0ms collecting garbage
Compiler

Compiled 1 950 to 451 computations (76.9% saved)

prune29.0ms (0.3%)

Memory
-9.2MiB live, 34.6MiB allocated; 7ms collecting garbage
Pruning

7 alts after pruning (6 fresh and 1 done)

PrunedKeptTotal
New78684
Fresh000
Picked011
Done000
Total78785
Accuracy
99.7%
Counts
85 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.6%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
▶78.3%
(*.f64 r (/.f64 (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.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (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 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
✓78.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
▶45.7%
(*.f64 r #s(approx (/ (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/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) 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 711 to 300 computations (57.8% saved)

series388.0ms (4.3%)

Memory
24.1MiB live, 400.3MiB allocated; 53ms collecting garbage
Counts
102 → 614
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
r
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (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 #s(approx (/ (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/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))))
(*.f64 #s(literal -1 binary64) b)
(fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a))
(-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 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 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))
(/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(pow.f64 (sin.f64 a) #s(literal 2 binary64))
(pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))
(/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a)))
(*.f64 #s(literal -1/2 binary64) (sin.f64 a))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (sin.f64 a))
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (sin.f64 b) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (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 a b))
(+.f64 a b)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 a b))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
Outputs
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (+ (* (+ (* (- (* (* -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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#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 (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (* -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 (/ (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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (* b (+ 1/2 (* 7/6 (pow b 2))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (pow b 2) (+ 5/6 (* 14/9 (pow b 2))))) (* b (+ 1/2 (* 7/6 (pow b 2)))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (* b (+ 1 (* 2/3 (pow b 2)))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (* 7/6 (pow b 2)))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (+ (* 7/6 (pow b 2)) (* a (* b (+ 5/6 (* 14/9 (pow b 2)))))))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (* 1/3 b)))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (* 2/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* 7/6 (* a b))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 1/3))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 (+ 1/3 (* 2/3 (* a b)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* 7/6 a))))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* a (+ 7/6 (* 14/9 (* a b)))))))))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) #s(hole binary64 (* -2/3 a)))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) #s(hole binary64 (* a (- (* -14/9 (pow a 2)) 2/3))))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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 (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* 1/3 a)))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* 23/18 (pow a 2))))))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* 601/360 (pow a 2))))))))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* (pow a 2) (+ 601/360 (* 23183/15120 (pow a 2))))))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* 1/3 a)))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* 10/9 (pow a 2))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* 47/45 (pow a 2))))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* (pow a 2) (+ 47/45 (* 142/189 (pow a 2))))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #s(hole binary64 1/3))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #s(hole binary64 (+ 1/3 (* 7/6 (pow a 2)))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* 89/72 (pow a 2)))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #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 (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 1/6))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 (+ 1/6 (* -11/12 (pow a 2)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* -163/144 (pow a 2)) 11/12)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #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 (pow (cos a) 2) 3/2)) #s(hole binary64 (pow a 2)))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (* (pow a 2) (+ 1 (* 7/6 (pow a 2))))))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* 331/360 (pow a 2))))))))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 331/360 (* 3071/5040 (pow a 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 (pow (pow (cos a) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/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) -1) 1/6) #s(hole binary64 1/6))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (+ 1/6 (* 1/12 (pow a 2)))))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* 5/144 (pow a 2)))))))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* (pow a 2) (+ 5/144 (* 61/4320 (pow a 2)))))))))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) #s(hole binary64 (* -1/3 a)))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) #s(hole binary64 (* a (- (* -5/18 (pow a 2)) 1/3))))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (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/6 (sin a)) (* -1/2 (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 (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* -1/3 a)))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* a (- (* 1/18 (pow a 2)) 1/3))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/18 (* -1/360 (pow a 2)))) 1/3))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/18 (* (pow a 2) (- (* 1/15120 (pow a 2)) 1/360)))) 1/3))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* -1/2 a)))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* a (- (* 1/12 (pow a 2)) 1/2))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/12 (* -1/240 (pow a 2)))) 1/2))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/12 (* (pow a 2) (- (* 1/10080 (pow a 2)) 1/240)))) 1/2))))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 a))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (* 2 (sin a)) (* 2 (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 (* 2 (sin a)) #s(hole binary64 (* 2 a)))
#s(approx (* 2 (sin a)) #s(hole binary64 (* a (+ 2 (* -1/3 (pow a 2))))))
#s(approx (* 2 (sin a)) #s(hole binary64 (* a (+ 2 (* (pow a 2) (- (* 1/60 (pow a 2)) 1/3))))))
#s(approx (* 2 (sin a)) #s(hole binary64 (* a (+ 2 (* (pow a 2) (- (* (pow a 2) (+ 1/60 (* -1/2520 (pow a 2)))) 1/3))))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 2))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (+ 2 (* -2 (pow a 2)))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (+ 2 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (+ 2 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))) (/ (* r (* (sin b) (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))) (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))) (/ (* (sin b) (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))))) (+ (* -1 (/ (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (* (cos b) (cos (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin b))) (* a (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (cos (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin b)))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (cos b)))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* -1/2 (* a (sin b))))))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* a (+ (* -1/2 (sin b)) (* -1/6 (* a (cos b))))))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos b) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* a (* (sin b) (sin (* 1/2 (PI)))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* -1/2 (* a (* (cos b) (sin (* 1/2 (PI)))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* 1/6 (* a (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (+ (* (+ (* (- (* (* -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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) 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)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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 (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #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 (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (/ (pow (sin a) 2) (pow (cos a) 3))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow (sin a) 2)))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (/ 1/6 (cos a))))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) #s(hole binary64 (/ (+ (* -1/2 (sin a)) (* 1/6 (sin a))) (pow (cos a) 2))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (+ (* -1/2 (sin a)) (* 1/6 (sin a)))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* -1/2 (sin a))))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (* 2 (sin a)) #s(hole binary64 (* 2 (sin a))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (* 2 (pow (cos a) 2))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (+ 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 b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ a b)) (sin (* 1/2 (PI))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* (+ (* (- (* (* -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 (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (+ (* (+ (* (- (* (* -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 (/ (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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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) #s(hole binary64 (* -1 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 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* b r) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (+ (/ (* r (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)) (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))) (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ b (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* -1 (* b (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/2 (/ (* (cos a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (sin a)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1 (* b (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/2 (/ (* (cos a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (sin a)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/6 (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))))))) (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/2 (/ (* (cos a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (sin a)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (* (cos a) (cos (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin a))) (* b (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI)))))))))) (* (cos a) (cos (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin a)))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (cos a)))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (+ (cos a) (* -1/2 (* b (sin a))))))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (+ (cos a) (* b (+ (* -1/2 (sin a)) (* -1/6 (* b (cos a))))))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos a) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* b (* (sin a) (sin (* 1/2 (PI)))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* -1/2 (* b (* (cos a) (sin (* 1/2 (PI)))))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* 1/6 (* b (* (sin a) (sin (* 1/2 (PI)))))))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (+ (* (+ (* (- (* (* -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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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))) (/ (sin a) (* (pow b 2) (pow (cos a) 2)))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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 (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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 (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
Calls

9 calls:

TimeVariablePointExpression
81.0ms
b
@-inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (* -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))) (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) (pow (sin a) 2) (pow (pow (cos a) 2) 3/2) (pow (cos a) 2) (* (pow (cos a) -1) 1/6) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (* -1/2 (sin a)) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) (* 2 (sin a)) (* 2 (pow (cos a) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
49.0ms
a
@inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (* -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))) (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) (pow (sin a) 2) (pow (pow (cos a) 2) 3/2) (pow (cos a) 2) (* (pow (cos a) -1) 1/6) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (* -1/2 (sin a)) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) (* 2 (sin a)) (* 2 (pow (cos a) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
42.0ms
b
@inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (* -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))) (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) (pow (sin a) 2) (pow (pow (cos a) 2) 3/2) (pow (cos a) 2) (* (pow (cos a) -1) 1/6) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (* -1/2 (sin a)) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) (* 2 (sin a)) (* 2 (pow (cos a) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
33.0ms
a
@-inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (* -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))) (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) (pow (sin a) 2) (pow (pow (cos a) 2) 3/2) (pow (cos a) 2) (* (pow (cos a) -1) 1/6) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (* -1/2 (sin a)) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) (* 2 (sin a)) (* 2 (pow (cos a) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
33.0ms
a
@0
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (+ (* (+ (* (- (* (* -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))) (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (* 1/2 (pow (cos a) -1)) 1/2 (pow (cos a) -1) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) (pow (sin a) 2) (pow (pow (cos a) 2) 3/2) (pow (cos a) 2) (* (pow (cos a) -1) 1/6) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (* -1/2 (sin a)) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) (* 2 (sin a)) (* 2 (pow (cos a) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))

rewrite418.0ms (4.6%)

Memory
-7.8MiB live, 364.0MiB allocated; 142ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0319840550
0344237699
0989836546
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
716 → 836
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
r
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (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 #s(approx (/ (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/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))))
(*.f64 #s(literal -1 binary64) b)
(fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a))
(-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 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 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))
(/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(pow.f64 (sin.f64 a) #s(literal 2 binary64))
(pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))
(/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a)))
(*.f64 #s(literal -1/2 binary64) (sin.f64 a))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (sin.f64 a))
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (sin.f64 b) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (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 a b))
(+.f64 a b)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 a b))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (+ (* (+ (* (- (* (* -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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#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 (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (* -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 (/ (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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (* b (+ 1/2 (* 7/6 (pow b 2))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (pow b 2) (+ 5/6 (* 14/9 (pow b 2))))) (* b (+ 1/2 (* 7/6 (pow b 2)))))) (* (pow b 2) (+ 1 (* 2/3 (pow b 2)))))) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (* b (+ 1 (* 2/3 (pow b 2)))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (* 7/6 (pow b 2)))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a (+ (* a (+ 1/2 (+ (* 7/6 (pow b 2)) (* a (* b (+ 5/6 (* 14/9 (pow b 2)))))))) (* b (+ 1 (* 2/3 (pow b 2))))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (* 1/3 b)))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (* 2/3 (pow b 2)))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (+ (* 1/3 b) (* a (+ 1 (+ (* 2/3 (pow b 2)) (* 7/6 (* a b))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 1/3))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 (+ 1/3 (* 2/3 (* a b)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* 7/6 a))))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(hole binary64 (+ 1/3 (* a (+ (* 2/3 b) (* a (+ 7/6 (* 14/9 (* a b)))))))))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) #s(hole binary64 (* -2/3 a)))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) #s(hole binary64 (* a (- (* -14/9 (pow a 2)) 2/3))))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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 (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* 1/3 a)))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* 23/18 (pow a 2))))))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* 601/360 (pow a 2))))))))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 23/18 (* (pow a 2) (+ 601/360 (* 23183/15120 (pow a 2))))))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* 1/3 a)))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* 10/9 (pow a 2))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* 47/45 (pow a 2))))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* a (+ 1/3 (* (pow a 2) (+ 10/9 (* (pow a 2) (+ 47/45 (* 142/189 (pow a 2))))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #s(hole binary64 1/3))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #s(hole binary64 (+ 1/3 (* 7/6 (pow a 2)))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #s(hole binary64 (+ 1/3 (* (pow a 2) (+ 7/6 (* 89/72 (pow a 2)))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #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 (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 1/6))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 (+ 1/6 (* -11/12 (pow a 2)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 (+ 1/6 (* (pow a 2) (- (* -163/144 (pow a 2)) 11/12)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #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 (pow (cos a) 2) 3/2)) #s(hole binary64 (pow a 2)))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (* (pow a 2) (+ 1 (* 7/6 (pow a 2))))))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* 331/360 (pow a 2))))))))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (+ 7/6 (* (pow a 2) (+ 331/360 (* 3071/5040 (pow a 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 (pow (pow (cos a) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/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) -1) 1/6) #s(hole binary64 1/6))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (+ 1/6 (* 1/12 (pow a 2)))))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* 5/144 (pow a 2)))))))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (+ 1/6 (* (pow a 2) (+ 1/12 (* (pow a 2) (+ 5/144 (* 61/4320 (pow a 2)))))))))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) #s(hole binary64 (* -1/3 a)))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) #s(hole binary64 (* a (- (* -5/18 (pow a 2)) 1/3))))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (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/6 (sin a)) (* -1/2 (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 (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* -1/3 a)))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* a (- (* 1/18 (pow a 2)) 1/3))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/18 (* -1/360 (pow a 2)))) 1/3))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/18 (* (pow a 2) (- (* 1/15120 (pow a 2)) 1/360)))) 1/3))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* -1/2 a)))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* a (- (* 1/12 (pow a 2)) 1/2))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/12 (* -1/240 (pow a 2)))) 1/2))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* a (- (* (pow a 2) (+ 1/12 (* (pow a 2) (- (* 1/10080 (pow a 2)) 1/240)))) 1/2))))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 a))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (* 2 (sin a)) (* 2 (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 (* 2 (sin a)) #s(hole binary64 (* 2 a)))
#s(approx (* 2 (sin a)) #s(hole binary64 (* a (+ 2 (* -1/3 (pow a 2))))))
#s(approx (* 2 (sin a)) #s(hole binary64 (* a (+ 2 (* (pow a 2) (- (* 1/60 (pow a 2)) 1/3))))))
#s(approx (* 2 (sin a)) #s(hole binary64 (* a (+ 2 (* (pow a 2) (- (* (pow a 2) (+ 1/60 (* -1/2520 (pow a 2)))) 1/3))))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 2))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (+ 2 (* -2 (pow a 2)))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (+ 2 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (+ 2 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))) (/ (* r (* (sin b) (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))) (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))) (/ (* (sin b) (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))))) (+ (* -1 (/ (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (sin b) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (* (cos b) (cos (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin b))) (* a (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (cos (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin b)))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (cos b)))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* -1/2 (* a (sin b))))))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* a (+ (* -1/2 (sin b)) (* -1/6 (* a (cos b))))))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos b) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* a (* (sin b) (sin (* 1/2 (PI)))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* -1/2 (* a (* (cos b) (sin (* 1/2 (PI)))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* 1/6 (* a (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (+ (* (+ (* (- (* (* -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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) 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)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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 (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) #s(hole binary64 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) #s(hole binary64 (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #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 (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(hole binary64 (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) #s(hole binary64 (/ (pow (sin a) 2) (pow (cos a) 3))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow (sin a) 2)))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (pow (cos a) -1) 1/6) #s(hole binary64 (/ 1/6 (cos a))))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) #s(hole binary64 (/ (+ (* -1/2 (sin a)) (* 1/6 (sin a))) (pow (cos a) 2))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) #s(hole binary64 (+ (* -1/2 (sin a)) (* 1/6 (sin a)))))
#s(approx (* -1/2 (sin a)) #s(hole binary64 (* -1/2 (sin a))))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (* 2 (sin a)) #s(hole binary64 (* 2 (sin a))))
#s(approx (* 2 (pow (cos a) 2)) #s(hole binary64 (* 2 (pow (cos a) 2))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (+ 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 b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ a b)) (sin (* 1/2 (PI))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* (+ (* (- (* (* -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 (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (+ (* (+ (* (- (* (* -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 (/ (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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) #s(hole binary64 (+ (* b (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a)))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) #s(hole binary64 (+ (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (/ (sin a) (pow (cos a) 2)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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) #s(hole binary64 (* -1 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 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* b r) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (+ (/ (* r (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)) (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))) (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ b (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* -1 (* b (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/2 (/ (* (cos a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (sin a)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1 (* b (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/2 (/ (* (cos a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (sin a)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/6 (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))))))) (+ (* -1 (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1/2 (/ (* (cos a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (sin a)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (* 1/6 (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))))) (+ (* -1 (/ (* (sin a) (sin (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ (* (cos a) (cos (* 1/2 (PI)))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ 1 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (* (cos a) (cos (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin a))) (* b (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI)))))))))) (* (cos a) (cos (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin a)))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (cos a)))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (+ (cos a) (* -1/2 (* b (sin a))))))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (+ (cos a) (* b (+ (* -1/2 (sin a)) (* -1/6 (* b (cos a))))))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos a) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* b (* (sin a) (sin (* 1/2 (PI)))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* -1/2 (* b (* (cos a) (sin (* 1/2 (PI)))))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* 1/6 (* b (* (sin a) (sin (* 1/2 (PI)))))))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (+ (* (+ (* (- (* (* -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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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))) (/ (sin a) (* (pow b 2) (pow (cos a) 2)))))) (* -1 (/ (pow (sin a) 2) (* b (pow (cos a) 3))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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 (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) #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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #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 (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (sin b) (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 b a))))
r
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 b a))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 b a)))
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(cos.f64 (+.f64 b a))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 b a)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))
(sin.f64 a)
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (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 (*.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 #s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b)) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(+.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b) (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b)) (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b) (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(+.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b) (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))))))
(fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))))
(+.f64 (*.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))))
(*.f64 #s(literal -1 binary64) b)
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64)) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64))) (-.f64 (*.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
(fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a))) (neg.f64 (cos.f64 a)))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a))
(-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 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 (pow.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64)) (*.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))))
(fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))
(+.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))
(/.f64 (neg.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (neg.f64 (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
(/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (cos.f64 a))
(*.f64 (cos.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 3 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 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a)))) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 a)) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 a)) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))) (*.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 a)) (*.f64 #s(literal -1/2 binary64) (sin.f64 a))))))
(fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (sin.f64 a)))
(+.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 a)) (*.f64 #s(literal -1/2 binary64) (sin.f64 a)))
(*.f64 #s(literal -1/2 binary64) (sin.f64 a))
(*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a))) (neg.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (sin.f64 a))
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (neg.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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))) (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))))) (cos.f64 (+.f64 a b)))
(-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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)) (cos.f64 (-.f64 a b))) #s(literal 2 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 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (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)))
(*.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 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 a) (cos.f64 b) (*.f64 (cos.f64 a) (sin.f64 b)))
(sin.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (sin.f64 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)
#s(literal 0 binary64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
#s(literal 1 binary64)
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx r r)
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #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 (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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 a b)) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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 (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))))
#s(approx a a)
#s(approx (* (sin b) (sin a)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))
#s(approx (* (sin b) (sin a)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin b) (sin a)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 a a)))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 a a)))) #s(literal 1/6 binary64))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (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 (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (tan.f64 b))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+.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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (fma.f64 a (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (fma.f64 a (fma.f64 a (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 7/6 binary64) (*.f64 b b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (fma.f64 a (fma.f64 a (fma.f64 a (*.f64 (*.f64 b b) (+.f64 #s(literal 5/6 binary64) (*.f64 #s(literal 14/9 binary64) (*.f64 b b)))) (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 7/6 binary64) (*.f64 b b))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 7/6 binary64) (*.f64 b b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b)))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 7/6 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 5/6 binary64) (*.f64 #s(literal 14/9 binary64) (*.f64 b b))))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b)))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (*.f64 #s(literal 1/3 binary64) b))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) #s(literal 1/3 binary64))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 a b))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (+.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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (+.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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2))) (*.f64 #s(literal -2/3 binary64) a))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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 (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (*.f64 #s(literal 1/3 binary64) a))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (*.f64 a (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 23/18 binary64) (*.f64 a a)))))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (*.f64 a (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 23/18 binary64) (*.f64 #s(literal 601/360 binary64) (*.f64 a a)))))))
#s(approx (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (*.f64 a (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 23/18 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 601/360 binary64) (*.f64 #s(literal 23183/15120 binary64) (*.f64 a a)))))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (*.f64 #s(literal 1/3 binary64) a))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (*.f64 a (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 10/9 binary64) (*.f64 a a)))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (*.f64 a (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 10/9 binary64) (*.f64 #s(literal 47/45 binary64) (*.f64 a a)))))))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (*.f64 a (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 10/9 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 47/45 binary64) (*.f64 #s(literal 142/189 binary64) (*.f64 a a)))))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) #s(literal 1/3 binary64))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 7/6 binary64) (*.f64 a a))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (+.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)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (+.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 (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) #s(literal 1/6 binary64))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -11/12 binary64) (*.f64 a a))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -163/144 binary64) (*.f64 a a)) #s(literal 11/12 binary64)))))
#s(approx (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (+.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 (pow (cos a) 2) 3/2)) (*.f64 a a))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) (*.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 (pow (cos a) 2) 3/2)) (*.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 (pow (cos a) 2) 3/2)) (*.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 (pow (sin a) 2) (*.f64 a a))
#s(approx (pow (sin a) 2) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 a a)))))
#s(approx (pow (sin a) 2) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 a a)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin a) 2) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 a a)))) #s(literal 1/3 binary64))))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(literal 1 binary64))
#s(approx (pow (pow (cos a) 2) 3/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (*.f64 a a))))
#s(approx (pow (pow (cos a) 2) 3/2) (+.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 (pow (cos a) 2) 3/2) (+.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 (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) -1) 1/6) #s(literal 1/6 binary64))
#s(approx (* (pow (cos a) -1) 1/6) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/12 binary64) (*.f64 a a))))
#s(approx (* (pow (cos a) -1) 1/6) (+.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 (* (pow (cos a) -1) 1/6) (+.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/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) (*.f64 #s(literal -1/3 binary64) a))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (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/6 (sin a)) (* -1/2 (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/6 (sin a)) (* -1/2 (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 (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (*.f64 #s(literal -1/3 binary64) a))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (*.f64 a (-.f64 (*.f64 #s(literal 1/18 binary64) (*.f64 a a)) #s(literal 1/3 binary64))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (*.f64 a (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/18 binary64) (*.f64 #s(literal -1/360 binary64) (*.f64 a a)))) #s(literal 1/3 binary64))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (*.f64 a (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/18 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/15120 binary64) (*.f64 a a)) #s(literal 1/360 binary64))))) #s(literal 1/3 binary64))))
#s(approx (* -1/2 (sin a)) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (* -1/2 (sin a)) (*.f64 a (-.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))
#s(approx (* -1/2 (sin a)) (*.f64 a (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/12 binary64) (*.f64 #s(literal -1/240 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))
#s(approx (* -1/2 (sin a)) (*.f64 a (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/10080 binary64) (*.f64 a a)) #s(literal 1/240 binary64))))) #s(literal 1/2 binary64))))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) a)
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/6 binary64) (*.f64 a a)))))
#s(approx (/ (* 2 (sin a)) (* 2 (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 (/ (* 2 (sin a)) (* 2 (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 (* 2 (sin a)) (*.f64 #s(literal 2 binary64) a))
#s(approx (* 2 (sin a)) (*.f64 a (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 a a)))))
#s(approx (* 2 (sin a)) (*.f64 a (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/60 binary64) (*.f64 a a)) #s(literal 1/3 binary64))))))
#s(approx (* 2 (sin a)) (*.f64 a (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/60 binary64) (*.f64 #s(literal -1/2520 binary64) (*.f64 a a)))) #s(literal 1/3 binary64))))))
#s(approx (* 2 (pow (cos a) 2)) #s(literal 2 binary64))
#s(approx (* 2 (pow (cos a) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
#s(approx (* 2 (pow (cos a) 2)) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 a a)) #s(literal 2 binary64)))))
#s(approx (* 2 (pow (cos a) 2)) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (*.f64 a 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 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 (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (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 (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (*.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 (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (+.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 (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (*.f64 a (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))
#s(approx (sin (+ a b)) (sin.f64 b))
#s(approx (sin (+ a b)) (+.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
#s(approx (sin (+ a b)) (+.f64 (sin.f64 b) (*.f64 a (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 b)))))))
#s(approx (sin (+ a b)) (+.f64 (sin.f64 b) (*.f64 a (+.f64 (cos.f64 b) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 b)))))))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (fma.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 a (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (+ (* (+ (* (- (* (* -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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (-.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)))
#s(approx (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (-.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (sin a) 2) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))
#s(approx (pow (pow (cos a) 2) 3/2) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (pow (cos a) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (* (pow (cos a) -1) 1/6) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))
#s(approx (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)) (/.f64 (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 2 binary64))))
#s(approx (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))))
#s(approx (* -1/2 (sin a)) (*.f64 #s(literal -1/2 binary64) (sin.f64 a)))
#s(approx (/ (* 2 (sin a)) (* 2 (pow (cos a) 2))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* 2 (sin a)) (*.f64 #s(literal 2 binary64) (sin.f64 a)))
#s(approx (* 2 (pow (cos a) 2)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.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 (pow.f64 (cos.f64 a) #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 (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) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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)) (*.f64 (cos.f64 a) (cos.f64 b)))
#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 (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (sin.f64 b) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 a b)) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 a b)) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ a b)) (sin.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 b)) (sin (/ (PI) 2))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 (+.f64 a b)))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.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 (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (sin.f64 b) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ a b)) (sin.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 (* (cos (+ a b)) (sin (/ (PI) 2))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx b b)
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))) #s(literal 1/2 binary64)))))
#s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (/.f64 b (cos.f64 a)))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) (fma.f64 b (fma.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) (fma.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (-.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (* -1 b) (*.f64 #s(literal -1 binary64) 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/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 (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 (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 b r) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.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 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (+.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 b (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) #s(literal -1 binary64))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 b (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))
#s(approx (sin (+ a b)) (sin.f64 a))
#s(approx (sin (+ a b)) (+.f64 (sin.f64 a) (*.f64 b (cos.f64 a))))
#s(approx (sin (+ a b)) (+.f64 (sin.f64 a) (*.f64 b (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 a)))))))
#s(approx (sin (+ a b)) (+.f64 (sin.f64 a) (*.f64 b (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 a)))))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (fma.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 b (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (+ (* (+ (* (- (* (* -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 (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))))
#s(approx (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (* (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (pow (cos a) -1)) b) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (+ (* (+ (* (+ (* (* -1 b) (+ (* (/ (* (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (pow (cos a) 2)))) b) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) b) (/ (* 2 (sin a)) (* 2 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6))) (sin a)) (cos a)) -1) (/ (+ (* 1/6 (sin a)) (* -1/2 (sin a))) (pow (cos a) 2)))) (- (* 1/2 (pow (cos a) -1)) (+ (* (/ (pow (sin a) 2) (pow (pow (cos a) 2) 3/2)) -1) (* (pow (cos a) -1) 1/6)))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (sin.f64 b) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ a b)) (sin.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)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))

eval428.0ms (4.7%)

Memory
50.3MiB live, 556.4MiB allocated; 132ms collecting garbage
Compiler

Compiled 202 723 to 11 728 computations (94.2% saved)

prune916.0ms (10.1%)

Memory
-48.1MiB live, 898.9MiB allocated; 122ms collecting garbage
Pruning

14 alts after pruning (10 fresh and 4 done)

PrunedKeptTotal
New1 75591 764
Fresh011
Picked235
Done011
Total1 757141 771
Accuracy
99.8%
Counts
1 771 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.6%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
✓78.3%
(*.f64 r (/.f64 (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.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (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))))))))
▶99.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
99.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.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))) (*.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))))))))
▶66.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 r (/.f64 (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 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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))))))))
60.9%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
✓99.5%
(*.f64 r (/.f64 (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))))
▶61.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)))))))) (/.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 (pow.f64 (cos.f64 a) #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 (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))))))
77.9%
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
✓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))))
▶19.7%
#s(approx (* 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))) (*.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)))))))))))
Compiler

Compiled 1 743 to 739 computations (57.6% saved)

series235.0ms (2.6%)

Memory
8.0MiB live, 296.5MiB allocated; 36ms collecting garbage
Counts
88 → 633
Calls
Call 1
Inputs
(*.f64 r (/.f64 (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 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
r
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.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))) (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)))))))
(sin.f64 b)
b
(/.f64 (-.f64 (*.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))) (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 (*.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))) (pow.f64 (*.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))) (*.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 (cos.f64 a) #s(literal 2 binary64))
(cos.f64 a)
a
#s(literal 2 binary64)
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(cos.f64 b)
(*.f64 (cos.f64 a) (cos.f64 b))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(sin.f64 a)
#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 (+ 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 #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)))) 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))))))))))
(*.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(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))))))))
(*.f64 (*.f64 a a) a)
(*.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))) (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)))))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(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))))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64)))
(pow.f64 (sin.f64 b) #s(literal 4 binary64))
#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)))))
(/.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 (*.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)))
(*.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)))))
(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 (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 r (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(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(literal -1/2 binary64)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))
(*.f64 r (sin.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))
(/.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)
(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)))))
(*.f64 (/.f64 r a) (tan.f64 b))
(/.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))))
(*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(literal 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 (*.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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (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))
(-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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)))
(pow.f64 (pow.f64 (cos.f64 a) #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)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (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 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
Outputs
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (+ (* (+ (* (- (* (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) 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)))))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) 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))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) 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)))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* r (pow (sin b) 2))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) a)) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* r (pow (sin b) 4))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (* r (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a)))) a)))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* r (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* r (pow (sin b) 3))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* -1 (/ (* r (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) a))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (/ (* r (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) a)))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* r (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* r (sin b)) (* a (cos b)))))
#s(approx (/ r a) #s(hole binary64 (/ r a)))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* 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 (pow (cos a) 2) 3/2) (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) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (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 (+ (* (+ (* (- (* (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) 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)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) 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))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) 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)))))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) a)) (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) a)) (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (* r (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a)))) a))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* -1 (* r (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a)))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* r (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* r (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) a)))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* r (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) a))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (* r (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (cos b)))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* 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 (* (* a a) a) #s(hole binary64 (pow a 3)))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 3))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))) (pow a 3))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* 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)))))))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 3))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 3))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* 1/6 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))))))))) (pow a 3))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #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))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 2) (cos b)))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 2))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #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))) (pow a 2))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* r (sin b)) (* (pow a 2) (cos b)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 2))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 2) (cos b))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 2))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (/ (* r (sin b)) (* a (cos b))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) 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 (/ (* 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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (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 (- (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #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) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (* 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 (/ (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 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (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)) (* (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 (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#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 (cos a) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin 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 (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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)) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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)) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -1/2 (/ (* r (sin b)) (* a (cos b)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* 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)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* 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)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))) a)))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (+ (* -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))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a)))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 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 (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 (- (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (pow (cos a) 2) 3/2) #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) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (/ (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 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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)) (* (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 (* 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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (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) 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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (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 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a)) (* -1/2 (/ (* r (sin b)) (cos b))))) a)))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) a))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a)) (* -1/2 (/ (* r (sin b)) (cos b))))) a))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (+ (* -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)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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 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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* 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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 2) (* b (+ (* 1/2 r) (/ r (pow a 2)))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))) (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* b (+ (* -1 (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))) (* (pow a 3) (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))))) (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* b (+ (* -1 (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))) (* b (+ (* -1 (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r))))))))) (* (pow a 3) (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))))))) (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (pow a 2) (* b (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))) (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))) (* b (+ (* -1 (* (pow a 3) (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))))) (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))) (* b (+ (* b (+ (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))) (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 r) (+ (* -1 (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (+ (* 1/6 r) (* b (+ (* -1 (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* -1/3 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* 2/45 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* (pow b 2) (+ (* -1/315 (* (pow b 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (+ (* 1/6 r) (* b (+ (* -1 (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) r)))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (- (* -2/3 r) (* -2 r)))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (- (+ (* -2/3 r) (* (pow b 2) (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))) (* -2 r)))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (- (+ (* -2/3 r) (* (pow b 2) (- (+ (* 1/5 r) (* (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)))))))) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))) (* -2 r)))))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) r)))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* -2/3 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (+ (* -2/3 r) (* 1/5 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (+ (* -2/3 r) (* (pow b 2) (+ (* -34/945 (* (pow b 2) r)) (* 1/5 r)))))))))
#s(approx (pow (sin b) 4) #s(hole binary64 (pow b 4)))
#s(approx (pow (sin b) 4) #s(hole binary64 (* (pow b 4) (+ 1 (* -2/3 (pow b 2))))))
#s(approx (pow (sin b) 4) #s(hole binary64 (* (pow b 4) (+ 1 (* (pow b 2) (- (* 1/5 (pow b 2)) 2/3))))))
#s(approx (pow (sin b) 4) #s(hole binary64 (* (pow b 4) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/5 (* -34/945 (pow b 2)))) 2/3))))))
#s(approx (pow (cos b) 4) #s(hole binary64 1))
#s(approx (pow (cos b) 4) #s(hole binary64 (+ 1 (* -2 (pow b 2)))))
#s(approx (pow (cos b) 4) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 5/3 (pow b 2)) 2)))))
#s(approx (pow (cos b) 4) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 5/3 (* -34/45 (pow b 2)))) 2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (+ (* 1/6 r) (* b (+ (* -1 (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (* b (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r))))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* b (+ (* 1/2 (/ r a)) (+ (/ r (pow a 3)) (/ (* b r) (pow a 2)))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* b (+ (* 1/2 (/ r a)) (+ (* b (+ (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (/ r (pow a 2)))) (/ r (pow a 3)))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* b (+ (* 1/2 (/ r a)) (+ (* b (+ (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (+ (* 1/3 (/ r (pow a 3))) (* b (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2)))))))) (/ r (pow a 2)))) (/ r (pow a 3)))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (/ r (pow a 2))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (+ (/ r (pow a 2)) (/ (* b r) a))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (+ (* b (+ (* b (+ (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))) (* 1/3 (/ r (pow a 2))))) (/ r a))) (/ r (pow a 2)))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (+ (* b (+ (* b (+ (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))) (+ (* 1/3 (/ r (pow a 2))) (* b (- (* -1/3 (/ r a)) (* -1 (/ r a))))))) (/ r a))) (/ r (pow a 2)))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* 1/2 (* b r))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* b (+ (* -1 (* (pow b 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (* 1/2 r)))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* b (+ (* 1/2 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))) (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* b (+ (* 1/2 r) (* (pow b 2) (+ (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))) (* (pow b 2) (+ (* -1 (* (pow b 2) (+ (* -1 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))))) (* -1 (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))))))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (* (pow b 2) (+ (* -1 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))))))))))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (* -1/2 r) (* -3/2 r)))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (+ (* 13/120 r) (* (pow b 2) (- (* -41/3024 r) (+ (* -3/2 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/2 r) (* -3/2 r)))))))) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* -1/2 (* (pow b 2) r))))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* 13/120 (* (pow b 2) r))))))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #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 (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b r)))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (+ (* 1/120 r) (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* b r) (pow a 2))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* b (+ (/ r (pow a 2)) (/ (* b r) a)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* b (+ (* b (+ (* 1/3 (/ (* b r) (pow a 2))) (/ r a))) (/ r (pow a 2))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* 1/3 (/ r (pow a 2))) (* b (- (* -1/3 (/ r a)) (* -1 (/ r a)))))) (/ r a))) (/ r (pow a 2))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* b r) (pow a 2)))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* b (+ (* -1 (/ r (pow a 2))) (* -1 (/ (* b r) a))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* b (+ (* -1 (/ r (pow a 2))) (* b (+ (* -1 (/ r a)) (* -1/3 (/ (* b r) (pow a 2)))))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* b (+ (* -1 (/ r (pow a 2))) (* b (+ (* -1 (/ r a)) (* b (+ (* -1 (/ (* b (- (* -1/3 r) (* -1 r))) a)) (* -1/3 (/ r (pow a 2)))))))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (/ (* b r) a))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* -1 (* b r)) (* -1 (/ r a))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* -1 (/ r a)) (* b (+ (* -1 r) (* -1/3 (/ (* b r) a))))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* -1 (/ r a)) (* b (+ (* -1 r) (* b (+ (* -1 (* b (- (* -1/3 r) (* -1 r)))) (* -1/3 (/ r a))))))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* b r) a)))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) r) a)) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) r) a)) (* 1/3 (/ r a)))) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ r a)) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) r) a)) (* 2/15 (/ r a)))))) (/ r a)))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (* (pow b 2) r))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -1/3 r) (* -1 r))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (* (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/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* 1/6 (* (pow b 2) r))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/6 r) (* 1/6 (* (pow b 2) (- (* -1/3 r) (* -1 r))))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/6 r) (* (pow b 2) (+ (* 1/6 (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/6 r) (* (pow b 2) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* 1/6 (* (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/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* 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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (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 (* r (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (* 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 (/ (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 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (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)) (* (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 (sin b) #s(hole binary64 (sin b)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (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 (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (pow (sin b) 4) #s(hole binary64 (pow (sin b) 4)))
#s(approx (pow (cos b) 4) #s(hole binary64 (pow (cos b) 4)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))))
#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 (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
Calls

9 calls:

TimeVariablePointExpression
38.0ms
r
@0
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) 3 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* (* a a) a) (* a a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (* r (pow (sin b) 4)) (pow (sin b) 4) 4 (pow (cos b) 4) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (* -1/2 (/ (* r (sin b)) (cos b))) -1/2 (/ (* r (sin b)) (cos b)) (* r (sin b)) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (* (/ r a) (tan b)) (/ r a) (tan b) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) 1/6 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (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 (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (* r (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (* 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))
34.0ms
b
@-inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) 3 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* (* a a) a) (* a a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (* r (pow (sin b) 4)) (pow (sin b) 4) 4 (pow (cos b) 4) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (* -1/2 (/ (* r (sin b)) (cos b))) -1/2 (/ (* r (sin b)) (cos b)) (* r (sin b)) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (* (/ r a) (tan b)) (/ r a) (tan b) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) 1/6 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (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 (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (* r (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (* 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))
25.0ms
r
@-inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) 3 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* (* a a) a) (* a a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (* r (pow (sin b) 4)) (pow (sin b) 4) 4 (pow (cos b) 4) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (* -1/2 (/ (* r (sin b)) (cos b))) -1/2 (/ (* r (sin b)) (cos b)) (* r (sin b)) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (* (/ r a) (tan b)) (/ r a) (tan b) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) 1/6 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (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 (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (* r (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (* 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))
24.0ms
b
@inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) 3 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* (* a a) a) (* a a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (* r (pow (sin b) 4)) (pow (sin b) 4) 4 (pow (cos b) 4) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (* -1/2 (/ (* r (sin b)) (cos b))) -1/2 (/ (* r (sin b)) (cos b)) (* r (sin b)) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (* (/ r a) (tan b)) (/ r a) (tan b) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) 1/6 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (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 (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (* r (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (* 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))
17.0ms
r
@inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) 3 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (* (* a a) a) (* a a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (* r (pow (sin b) 2)) (pow (sin b) 2) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (* r (pow (sin b) 4)) (pow (sin b) 4) 4 (pow (cos b) 4) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (sin b) 2) 3/2) 3/2 (pow (pow (cos b) 2) 3/2) (* -1/2 (/ (* r (sin b)) (cos b))) -1/2 (/ (* r (sin b)) (cos b)) (* r (sin b)) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (* (/ r a) (tan b)) (/ r a) (tan b) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) 1/6 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (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 (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) (* r (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (* 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))

rewrite354.0ms (3.9%)

Memory
16.2MiB live, 427.7MiB allocated; 103ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0257546464
0278442899
0876741566
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
721 → 864
Calls
Call 1
Inputs
(*.f64 r (/.f64 (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 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
r
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.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))) (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)))))))
(sin.f64 b)
b
(/.f64 (-.f64 (*.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))) (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 (*.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))) (pow.f64 (*.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))) (*.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 (cos.f64 a) #s(literal 2 binary64))
(cos.f64 a)
a
#s(literal 2 binary64)
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(cos.f64 b)
(*.f64 (cos.f64 a) (cos.f64 b))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(sin.f64 a)
#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 (+ 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 #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)))) 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))))))))))
(*.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(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))))))))
(*.f64 (*.f64 a a) a)
(*.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))) (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)))))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(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))))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64)))
(pow.f64 (sin.f64 b) #s(literal 4 binary64))
#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)))))
(/.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 (*.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)))
(*.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)))))
(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 (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 r (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(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(literal -1/2 binary64)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))
(*.f64 r (sin.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))
(/.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)
(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)))))
(*.f64 (/.f64 r a) (tan.f64 b))
(/.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))))
(*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(literal 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 (*.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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (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))
(-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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)))
(pow.f64 (pow.f64 (cos.f64 a) #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)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (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 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (+ (* (+ (* (- (* (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) 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)))))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) 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))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) 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)))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* r (pow (sin b) 2))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) a)) (+ (* -1 (/ (pow (sin b) 4) (pow (cos b) 4))) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* r (pow (sin b) 4))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* r (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (* r (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a)))) a)))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* r (+ (* -1 (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (* -1 (/ (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))) a))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* r (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* r (pow (sin b) 3))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* -1 (/ (* r (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) a))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (/ (* r (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) a)))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* r (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* r (sin b)) (* a (cos b)))))
#s(approx (/ r a) #s(hole binary64 (/ r a)))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* 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 (pow (cos a) 2) 3/2) (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) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (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 (+ (* (+ (* (- (* (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) 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)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (pow a 3) (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) 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))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) 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)))))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) a)) (+ (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (pow (sin b) 4) (pow (cos b) 4))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* r (+ (* -1 (/ (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a))) a)) (* -1/6 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (* r (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a)))) a))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* -1 (* r (+ (* -1 (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))) (* -1 (/ (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) a)))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* r (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* -1 (* r (+ (* 1/2 (/ (sin b) (cos b))) (/ (pow (sin b) 3) (pow (cos b) 3)))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* r (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) a)))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* r (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) a))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (* r (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (+ (* (- (* (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (cos b)))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* 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 (* (* a a) a) #s(hole binary64 (pow a 3)))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 3))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))) (pow a 3))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* 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)))))))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 3))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 3))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))) (pow a 3))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (cos b))) (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* 1/6 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))))))))) (pow a 3))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (* r (sin b)) (* (pow a 3) (cos b)))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 3))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #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))) (pow a 3))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (/ (* r (sin b)) (* (pow a 2) (cos b)))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 2))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #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))) (pow a 2))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* r (sin b)) (* (pow a 2) (cos b)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b))) (pow a 2))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* r (sin b)) (* (pow a 2) (cos b))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) (pow a 2))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (/ (* r (sin b)) (* a (cos b))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (/ (+ (* -1 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))) (* -1 (/ (* r (sin b)) (cos b)))) 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 (/ (* 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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (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 (- (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #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) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (* 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 (/ (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 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (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)) (* (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 (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#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 (cos a) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin 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 (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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)) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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)) (+ (/ (* r (sin b)) (* (pow a 3) (cos b))) (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 3) (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 2) (pow (cos b) 2)))) (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* r (pow (sin b) 2)) (* (pow a 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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 3)) (* a (pow (cos b) 3)))) (+ (* -1/2 (/ (* r (sin b)) (* a (cos b)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* 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)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -1 (/ (* r (sin b)) (* (pow a 3) (cos b)))) (+ (* -1 (/ (* 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)))) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))) a))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))) a)))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (+ (* -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))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (+ (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (+ (/ (* r (sin b)) (* (pow a 2) (cos b))) (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a)))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 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 (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 (- (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (pow (cos a) 2) 3/2) #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) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (/ (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 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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)) (* (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 (* 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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (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) 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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (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 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a)) (* -1/2 (/ (* r (sin b)) (cos b))))) a)))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (+ (* -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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 2)) (* a (pow (cos b) 2)))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) a))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (+ (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a)) (* -1/2 (/ (* r (sin b)) (cos b))))) a))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (+ (* -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)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) a))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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 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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* 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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (pow a 2) (* b (+ (* 1/2 r) (/ r (pow a 2)))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))) (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* b (+ (* -1 (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))) (* (pow a 3) (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))))) (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* b (+ (* -1 (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))) (* b (+ (* -1 (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r))))))))) (* (pow a 3) (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))))))) (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (* (pow a 2) (* b (+ (* 1/2 r) (/ r (pow a 2))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))) (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))) (* b (+ (* -1 (* (pow a 3) (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))))) (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (* (pow a 2) (+ (* 1/2 r) (/ r (pow a 2))))) (* b (+ (* b (+ (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (* (pow a 3) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))) (* (pow a 3) (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 r) (+ (* -1 (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 r) (+ (* -1 (/ r (pow a 2))) (+ (* 1/6 r) (* b (+ (* -1 (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (* -1/3 r) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (- (+ (* -1/3 r) (* (pow b 2) (- (+ (* 2/45 r) (* (pow b 2) (- (* -1/315 r) (+ (* -1 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/3 r) (* -1 r)))))))) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* -1/3 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* 2/45 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 2)) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* -1/3 r) (* (pow b 2) (+ (* -1/315 (* (pow b 2) r)) (* 2/45 r)))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (+ (* 1/6 r) (* b (+ (* -1 (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (* b (+ (* -1 r) (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) r)))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (- (* -2/3 r) (* -2 r)))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (- (+ (* -2/3 r) (* (pow b 2) (- (* 1/5 r) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))) (* -2 r)))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (- (+ (* -2/3 r) (* (pow b 2) (- (+ (* 1/5 r) (* (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)))))))) (+ (* -2 (- (* -2/3 r) (* -2 r))) (* 5/3 r))))) (* -2 r)))))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) r)))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* -2/3 (* (pow b 2) r))))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (+ (* -2/3 r) (* 1/5 (* (pow b 2) r))))))))
#s(approx (* r (pow (sin b) 4)) #s(hole binary64 (* (pow b 4) (+ r (* (pow b 2) (+ (* -2/3 r) (* (pow b 2) (+ (* -34/945 (* (pow b 2) r)) (* 1/5 r)))))))))
#s(approx (pow (sin b) 4) #s(hole binary64 (pow b 4)))
#s(approx (pow (sin b) 4) #s(hole binary64 (* (pow b 4) (+ 1 (* -2/3 (pow b 2))))))
#s(approx (pow (sin b) 4) #s(hole binary64 (* (pow b 4) (+ 1 (* (pow b 2) (- (* 1/5 (pow b 2)) 2/3))))))
#s(approx (pow (sin b) 4) #s(hole binary64 (* (pow b 4) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/5 (* -34/945 (pow b 2)))) 2/3))))))
#s(approx (pow (cos b) 4) #s(hole binary64 1))
#s(approx (pow (cos b) 4) #s(hole binary64 (+ 1 (* -2 (pow b 2)))))
#s(approx (pow (cos b) 4) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 5/3 (pow b 2)) 2)))))
#s(approx (pow (cos b) 4) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 5/3 (* -34/45 (pow b 2)))) 2)))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* -1 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (* 1/6 r)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3)))))) (+ (* -1 (/ r (pow a 2))) (* 1/6 r))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* b (+ (* -1 (/ (+ (* 1/2 r) (/ r (pow a 2))) a)) (* b (+ (* -1 (/ r (pow a 2))) (+ (* 1/6 r) (* b (+ (* -1 (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (* b (+ (* -1 (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2))))) (* 1/6 (- (* -1/3 r) (* -1 r))))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (* b (+ (* 1/2 r) (/ r (pow a 2)))) a)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* b (+ (* 1/2 (/ r a)) (+ (/ r (pow a 3)) (/ (* b r) (pow a 2)))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* b (+ (* 1/2 (/ r a)) (+ (* b (+ (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (* 1/3 (/ r (pow a 3))))) (/ r (pow a 2)))) (/ r (pow a 3)))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (* b (+ (* 1/2 (/ r a)) (+ (* b (+ (* b (+ (* -1 (/ (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))) a)) (+ (* 1/3 (/ r (pow a 3))) (* b (- (* -1/3 (/ r (pow a 2))) (* -1 (/ r (pow a 2)))))))) (/ r (pow a 2)))) (/ r (pow a 3)))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (/ r (pow a 2))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (+ (/ r (pow a 2)) (/ (* b r) a))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (+ (* b (+ (* b (+ (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))) (* 1/3 (/ r (pow a 2))))) (/ r a))) (/ r (pow a 2)))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) #s(hole binary64 (* b (+ (* 1/2 r) (+ (* b (+ (* b (+ (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))) (+ (* 1/3 (/ r (pow a 2))) (* b (- (* -1/3 (/ r a)) (* -1 (/ r a))))))) (/ r a))) (/ r (pow a 2)))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* 1/2 (* b r))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* b (+ (* -1 (* (pow b 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))) (* 1/2 r)))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* b (+ (* 1/2 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))) (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* b (+ (* 1/2 r) (* (pow b 2) (+ (* -1 (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r))))) (* (pow b 2) (+ (* -1 (* (pow b 2) (+ (* -1 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))))) (* -1 (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))))))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1 (- (* -1/2 r) (* -3/2 r))) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (* (pow b 2) (+ (* -1 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (* -1/2 (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))))))))))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (* -1/2 r) (* -3/2 r)))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (- (+ (* -1/2 r) (* (pow b 2) (- (+ (* 13/120 r) (* (pow b 2) (- (* -41/3024 r) (+ (* -3/2 (- (* 13/120 r) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r)))) (+ (* -61/240 r) (* 7/8 (- (* -1/2 r) (* -3/2 r)))))))) (+ (* -3/2 (- (* -1/2 r) (* -3/2 r))) (* 7/8 r))))) (* -3/2 r)))))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) r)))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* -1/2 (* (pow b 2) r))))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #s(hole binary64 (* (pow b 3) (+ r (* (pow b 2) (+ (* -1/2 r) (* 13/120 (* (pow b 2) r))))))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) #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 (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* -1/2 (* b r))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* -1/2 (* (pow b 2) (- (* -1/6 r) (* -1/2 r))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 (- (* -1/6 r) (* -1/2 r)))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) #s(hole binary64 (* b (+ (* -1/2 r) (* (pow b 2) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))))))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b r)))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (* -1/6 r) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (/ (* r (sin b)) (cos b)) #s(hole binary64 (* b (+ r (* (pow b 2) (- (+ (* -1/6 r) (* (pow b 2) (- (+ (* 1/120 r) (* (pow b 2) (- (* -1/5040 r) (+ (* -1/2 (- (* 1/120 r) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r)))) (+ (* -1/720 r) (* 1/24 (- (* -1/6 r) (* -1/2 r)))))))) (+ (* -1/2 (- (* -1/6 r) (* -1/2 r))) (* 1/24 r))))) (* -1/2 r)))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (/ (* b r) (pow a 2))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* b (+ (/ r (pow a 2)) (/ (* b r) a)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* b (+ (* b (+ (* 1/3 (/ (* b r) (pow a 2))) (/ r a))) (/ r (pow a 2))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* 1/3 (/ r (pow a 2))) (* b (- (* -1/3 (/ r a)) (* -1 (/ r a)))))) (/ r a))) (/ r (pow a 2))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* -1 (/ (* b r) (pow a 2)))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* b (+ (* -1 (/ r (pow a 2))) (* -1 (/ (* b r) a))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* b (+ (* -1 (/ r (pow a 2))) (* b (+ (* -1 (/ r a)) (* -1/3 (/ (* b r) (pow a 2)))))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) #s(hole binary64 (* b (+ (* -1 (/ r (pow a 2))) (* b (+ (* -1 (/ r a)) (* b (+ (* -1 (/ (* b (- (* -1/3 r) (* -1 r))) a)) (* -1/3 (/ r (pow a 2)))))))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* -1 (/ (* b r) a))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* -1 (* b r)) (* -1 (/ r a))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* -1 (/ r a)) (* b (+ (* -1 r) (* -1/3 (/ (* b r) a))))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) #s(hole binary64 (* b (+ (* -1 (/ r a)) (* b (+ (* -1 r) (* b (+ (* -1 (* b (- (* -1/3 r) (* -1 r)))) (* -1/3 (/ r a))))))))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (/ (* b r) a)))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) r) a)) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) r) a)) (* 1/3 (/ r a)))) (/ r a)))))
#s(approx (* (/ r a) (tan b)) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ r a)) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) r) a)) (* 2/15 (/ r a)))))) (/ r a)))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* -1 (* (pow b 2) r))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* -1 (* (pow b 2) (- (* -1/3 r) (* -1 r))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* (pow b 2) (+ (* -1 (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* -1 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* -1 r) (* (pow b 2) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* -1 (* (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/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* 1/6 (* (pow b 2) r))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/6 r) (* 1/6 (* (pow b 2) (- (* -1/3 r) (* -1 r))))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/6 r) (* (pow b 2) (+ (* 1/6 (* (pow b 2) (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))) (* 1/6 (- (* -1/3 r) (* -1 r)))))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/6 r) (* (pow b 2) (+ (* 1/6 (- (* -1/3 r) (* -1 r))) (* (pow b 2) (+ (* 1/6 (* (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/6 (- (* 2/45 r) (+ (* -1 (- (* -1/3 r) (* -1 r))) (* 1/3 r))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* 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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (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 (* r (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (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 (* 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 (/ (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 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (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)) (* (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 (sin b) #s(hole binary64 (sin b)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan 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(hole binary64 (* (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 (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (pow (sin b) 4) #s(hole binary64 (pow (sin b) 4)))
#s(approx (pow (cos b) 4) #s(hole binary64 (pow (cos b) 4)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) #s(hole binary64 (* -1 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) #s(hole binary64 (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))))
#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 (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))))
r
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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)))))))
(sin.f64 b)
b
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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)))))) (/.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 (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)))))))
(*.f64 (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/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 (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)))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
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)))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(*.f64 (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 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(sin.f64 a)
#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 (+ 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 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 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))) (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)))) a) (* r (tan b))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 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))))))))))
(*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 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))) (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(literal -1 binary64)
(*.f64 (pow.f64 a #s(literal 3 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))) (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))))))))
(*.f64 (*.f64 a a) a)
(*.f64 a (*.f64 a a))
(pow.f64 a #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64)))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.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)))) #s(literal 3 binary64)) (pow.f64 (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(literal 3 binary64))) (fma.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 #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 (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)))))) (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))))))) (*.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)))) (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))))))))))
(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)))))))
(+.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)))) (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)))))))
(/.f64 (neg.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(*.f64 (sin.f64 b) (sin.f64 b))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.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)))) #s(literal 3 binary64)) (pow.f64 (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(literal 3 binary64))) (fma.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)))) (*.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 (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))))) (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)))))) (*.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 (+.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)))))))))
(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))))))
(+.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 (+.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))))))
(/.f64 (neg.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
(/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64)))
(pow.f64 (sin.f64 b) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 4 binary64)))
#s(literal 4 binary64)
(pow.f64 (cos.f64 b) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 4 binary64)))
(/.f64 (+.f64 (pow.f64 (*.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)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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 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 (*.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (*.f64 (*.f64 #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))))))))
(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)))))
(+.f64 (*.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)))))
(/.f64 (neg.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)))) (neg.f64 a))
(/.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 (/.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))))) a) (/.f64 (*.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 (+.f64 (pow.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))))) #s(literal 3 binary64)) (pow.f64 (*.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)) #s(literal 3 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) (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 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a))) (*.f64 (*.f64 #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))))))
(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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a)))
(+.f64 (*.f64 #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)))
(*.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 (pow.f64 (*.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(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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 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 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (*.f64 (*.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)))))))
(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 #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 (neg.f64 (*.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 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 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (sin.f64 b))
(*.f64 (sin.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(pow.f64 (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 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (*.f64 r (sin.f64 b))) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))
(*.f64 r (sin.f64 b))
(*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a))
(/.f64 (neg.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)))))) (neg.f64 a))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a)
(+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b))) 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)))) a))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b))) #s(literal 3 binary64)) (pow.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)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b)))) (-.f64 (*.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 #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 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))))))))
(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)))))
(+.f64 (*.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)))))
(*.f64 (/.f64 r a) (tan.f64 b))
(/.f64 (neg.f64 (*.f64 r (sin.f64 b))) (neg.f64 (*.f64 a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (*.f64 a (cos.f64 b)))
(/.f64 (neg.f64 r) (neg.f64 a))
(/.f64 r a)
(/.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 #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 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(literal 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 (*.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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (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 (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 a) #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 (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 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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)))))) (/.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 (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)))))))
(*.f64 (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (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))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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)))))) (/.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 (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)))))))
(*.f64 (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/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 (+.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))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #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 (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 r)
#s(approx (* r (/ (sin b) (cos (+ a 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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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))))) a))) 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)))))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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))))) a))) 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))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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))))) a))) 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)))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* r (pow (sin b) 2)) (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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))))) a))) a) (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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* r (pow (sin b) 4)) (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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))))) a))) a) (*.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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (/.f64 (*.f64 r (fma.f64 #s(literal -1 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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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))))) a)))) a))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.f64 r (fma.f64 #s(literal -1 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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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))))) a)))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (*.f64 #s(literal -1 binary64) (*.f64 r (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 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (*.f64 r (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 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (/.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 (* r (pow (pow (sin b) 2) 3/2)) (*.f64 r (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos b)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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)))))) a)))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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)))))) a))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (*.f64 a (cos.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)))))))
#s(approx (* (/ r a) (tan b)) (*.f64 (/.f64 r a) (tan.f64 b)))
#s(approx (/ r a) (/.f64 r a))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.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)))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #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 (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 (pow (cos a) 2) 3/2) (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 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) 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)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) 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))))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) 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)))))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) 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 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))) a) (*.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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a)))) a)))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (*.f64 r (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal 1/2 binary64) (tan.f64 b) (pow.f64 (tan.f64 b) #s(literal 3 binary64))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/.f64 (*.f64 r (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a)))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 r (/.f64 (fma.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (cos.f64 b)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (*.f64 a (cos.f64 b)) (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 (/ (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))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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) (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 (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 (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 (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (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 (pow.f64 a #s(literal 3 binary64)) (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 (pow.f64 a #s(literal 3 binary64)) (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))) (+ (* (* (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 (* 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 (+ (* (+ (* (- (* (* -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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos 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 (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 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 (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.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 (sin.f64 b)) (cos.f64 b)))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 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 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)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.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))) (*.f64 a (+.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (*.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 (* (* a a) a) (pow.f64 a #s(literal 3 binary64)))
#s(approx (* a a) (*.f64 a a))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.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 (sin.f64 b)) (cos.f64 b)))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 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 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)))))))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.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))) (*.f64 a (+.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (*.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))))))))))))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.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 (sin.f64 b)) (cos.f64 b)))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 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 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)))))))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.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))) (*.f64 a (+.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))) (*.f64 a (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)))))))))))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.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 (sin.f64 b)) (cos.f64 b)))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 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 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)))))))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 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 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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (+.f64 (/.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (pow.f64 a #s(literal 3 binary64)))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (/.f64 (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))) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.f64 (/.f64 r (*.f64 a a)) (tan.f64 b)))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (+.f64 (/.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (/.f64 (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 a a))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (/.f64 (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))) (*.f64 a a)))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (*.f64 (/.f64 r (*.f64 a a)) (tan.f64 b)))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (+.f64 (/.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 a a)) (/.f64 (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 a a))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (*.f64 a a)) (tan.f64 b))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.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 (sin.f64 b)) (cos.f64 b)))) (*.f64 a a)))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.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 (sin.f64 b)) (cos.f64 b)))) a))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (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 (- (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 (pow (cos a) 2) 3/2) #s(literal 1 binary64))
#s(approx (pow (pow (cos a) 2) 3/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (*.f64 a a))))
#s(approx (pow (pow (cos a) 2) 3/2) (+.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 (pow (cos a) 2) 3/2) (+.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) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (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 (pow.f64 a #s(literal 3 binary64)) (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 (pow.f64 a #s(literal 3 binary64)) (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) (pow.f64 a #s(literal 3 binary64)))
#s(approx (pow (sin a) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
#s(approx (pow (sin a) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 13/120 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))))
#s(approx (pow (sin a) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 13/120 binary64) (*.f64 #s(literal -41/3024 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (/ (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))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (/ (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))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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) (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 (+ (* (* (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 (/ (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))))))) (/.f64 (*.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 (pow.f64 (cos.f64 a) #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 (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) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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) (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 (cos a) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#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 (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 (+ (* (+ (* (- (* (* -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 (pow.f64 a #s(literal 3 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)))))))))
#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 (pow.f64 a #s(literal 3 binary64)) (+.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 (pow.f64 a #s(literal 3 binary64)) (-.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 (pow.f64 a #s(literal 3 binary64)) (-.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 (pow.f64 a #s(literal 3 binary64))) (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 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)))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.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))))))) (fma.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) (*.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))))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.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))))))) (fma.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) (fma.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (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)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 (pow.f64 a #s(literal 3 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))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 (pow.f64 a #s(literal 3 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 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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 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 (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (fma.f64 #s(literal -1 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 (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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (fma.f64 #s(literal -1 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 (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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (fma.f64 #s(literal -1 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 (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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (fma.f64 #s(literal -1 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))) (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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (fma.f64 #s(literal -1 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))) (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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 r 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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (fma.f64 #s(literal -1 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))) (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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (tan.f64 b)) (fma.f64 #s(literal -1 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))) (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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (/.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))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (/.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)))) (fma.f64 (/.f64 r (*.f64 a a)) (tan.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))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (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))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (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)))) (fma.f64 (/.f64 r (*.f64 a a)) (tan.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)))))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (*.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (/.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))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.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)))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (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))))))
#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 (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 (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (pow (cos a) 2) 3/2) (pow.f64 (pow.f64 (cos.f64 a) #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 (pow (sin a) 3) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 (pow.f64 (cos.f64 a) #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 (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) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 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))))))) (/.f64 (*.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 (pow.f64 (cos.f64 a) #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 (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) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 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 (* r (/ (sin b) (cos (+ a 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 (pow.f64 a #s(literal 3 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 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 (pow.f64 a #s(literal 3 binary64)) (+.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 (pow.f64 a #s(literal 3 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))) (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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 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 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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 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))) (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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (+.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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (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 #s(literal -1 binary64) (/.f64 (+.f64 (*.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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) a))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (+.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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (+.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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (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 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) a)))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (+.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))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (*.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)))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx b b)
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/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) (*.f64 (*.f64 b b) (pow.f64 (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) (*.f64 (*.f64 b b) (pow.f64 (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) (*.f64 (*.f64 b b) (pow.f64 (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 (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 (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (*.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 (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (* 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 (*.f64 a a) (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 b (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64)))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))))))
#s(approx (* -1 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))))) (*.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.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)) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r (*.f64 a a))) (*.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)))) (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r)))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 b (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r)))))))))
#s(approx (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))) (*.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.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)) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r (*.f64 a a))) (*.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)))) (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r)))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))) a)))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r)))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r))))))))
#s(approx (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (fma.f64 #s(literal 1/6 binary64) r (*.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))))) (*.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)) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r (*.f64 a a))) (*.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)))) (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))))))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (*.f64 (*.f64 b b) r))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (*.f64 (*.f64 b b) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (*.f64 (*.f64 b b) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (+.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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)) (*.f64 (*.f64 b b) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/3 binary64) r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 2/45 binary64) r (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/315 binary64) r) (+.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 (* r (pow (sin b) 2)) (*.f64 (*.f64 b b) r))
#s(approx (* r (pow (sin b) 2)) (*.f64 (*.f64 b b) (+.f64 r (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 b b) r)))))
#s(approx (* r (pow (sin b) 2)) (*.f64 (*.f64 b b) (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3 binary64) r (*.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 b b) r)))))))
#s(approx (* r (pow (sin b) 2)) (*.f64 (*.f64 b b) (+.f64 r (*.f64 (*.f64 b b) (+.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 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))) a)))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r)))))))
#s(approx (+ (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (fma.f64 #s(literal 1/6 binary64) r (*.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))))) (*.f64 b (fma.f64 #s(literal -1 binary64) r (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r (*.f64 a a))) (*.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)))) (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) r))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2/3 binary64) r) (*.f64 #s(literal -2 binary64) r))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (+.f64 (*.f64 #s(literal -2/3 binary64) r) (*.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 -2 binary64) r))))))
#s(approx (/ (* r (pow (sin b) 4)) (pow (cos b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2/3 binary64) r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/5 binary64) r (*.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)))))))) (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 -2 binary64) r))))))
#s(approx (* r (pow (sin b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) r))
#s(approx (* r (pow (sin b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 r (*.f64 #s(literal -2/3 binary64) (*.f64 (*.f64 b b) r)))))
#s(approx (* r (pow (sin b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -2/3 binary64) r (*.f64 #s(literal 1/5 binary64) (*.f64 (*.f64 b b) r)))))))
#s(approx (* r (pow (sin b) 4)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 r (*.f64 (*.f64 b b) (+.f64 (*.f64 #s(literal -2/3 binary64) r) (*.f64 (*.f64 b b) (fma.f64 #s(literal -34/945 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/5 binary64) r))))))))
#s(approx (pow (sin b) 4) (pow.f64 b #s(literal 4 binary64)))
#s(approx (pow (sin b) 4) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (*.f64 b b)))))
#s(approx (pow (sin b) 4) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/5 binary64) (*.f64 b b)) #s(literal 2/3 binary64))))))
#s(approx (pow (sin b) 4) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/5 binary64) (*.f64 #s(literal -34/945 binary64) (*.f64 b b)))) #s(literal 2/3 binary64))))))
#s(approx (pow (cos b) 4) #s(literal 1 binary64))
#s(approx (pow (cos b) 4) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (*.f64 b b))))
#s(approx (pow (cos b) 4) (+.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 (pow (cos b) 4) (+.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 (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))) a)))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal 1/6 binary64) r)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (fma.f64 #s(literal 1/6 binary64) r (*.f64 b (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r (*.f64 a a))) (*.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)))) (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r)))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (/.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))) a))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 r a) (+.f64 (/.f64 r (pow.f64 a #s(literal 3 binary64))) (/.f64 (*.f64 b r) (*.f64 a a))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 r a) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))))) (/.f64 r (*.f64 a a))) (/.f64 r (pow.f64 a #s(literal 3 binary64)))))))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 r a) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (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)))) a) (fma.f64 #s(literal 1/3 binary64) (/.f64 r (pow.f64 a #s(literal 3 binary64))) (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r (*.f64 a a))) (*.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a))))))) (/.f64 r (*.f64 a a))) (/.f64 r (pow.f64 a #s(literal 3 binary64)))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (/.f64 r (*.f64 a a)))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) r) (+.f64 (/.f64 r (*.f64 a a)) (/.f64 (*.f64 b r) a)))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (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) (/.f64 r (*.f64 a a)))) (/.f64 r a)) (/.f64 r (*.f64 a a))))))
#s(approx (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (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) (/.f64 r (*.f64 a a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r a)) (*.f64 #s(literal -1 binary64) (/.f64 r a)))))) (/.f64 r a)) (/.f64 r (*.f64 a a))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (*.f64 #s(literal 1/2 binary64) (*.f64 b r)))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b 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 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (*.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 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r)))))) (*.f64 #s(literal -1 binary64) (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))))))))))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (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 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (fma.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))) (*.f64 #s(literal -1/2 binary64) (-.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 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -3/2 binary64) r)) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r)))))))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r)))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 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 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) r (+.f64 (*.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 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -3/2 binary64) r)) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r))))))))))))
#s(approx (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 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 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -3/2 binary64) r)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r))) (*.f64 (*.f64 b b) (fma.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))) (*.f64 #s(literal -1/2 binary64) (-.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))))))))))))))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (*.f64 (*.f64 (*.f64 b b) b) r))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (*.f64 (*.f64 (*.f64 b b) b) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -3/2 binary64) r))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (*.f64 (*.f64 (*.f64 b b) b) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) r) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 13/120 binary64) r) (fma.f64 #s(literal -3/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -3/2 binary64) r)) (*.f64 #s(literal 7/8 binary64) r))))) (*.f64 #s(literal -3/2 binary64) r))))))
#s(approx (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2)) (*.f64 (*.f64 (*.f64 b b) b) (+.f64 r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 13/120 binary64) r (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -41/3024 binary64) r) (+.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)))))))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) r) (*.f64 #s(literal -3/2 binary64) r)) (*.f64 #s(literal 7/8 binary64) r))))) (*.f64 #s(literal -3/2 binary64) r))))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) (*.f64 (*.f64 (*.f64 b b) b) r))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) (*.f64 (*.f64 (*.f64 b b) b) (+.f64 r (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) r)))))
#s(approx (* r (pow (pow (sin b) 2) 3/2)) (*.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 (* r (pow (pow (sin b) 2) 3/2)) (*.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 (* -1/2 (/ (* r (sin b)) (cos b))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r)))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))))
#s(approx (* -1/2 (/ (* r (sin b)) (cos b))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/5040 binary64) r) (+.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 (/ (* r (sin b)) (cos b)) (*.f64 b r))
#s(approx (/ (* r (sin b)) (cos b)) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* r (sin b)) (cos b)) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (/ (* r (sin b)) (cos b)) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/120 binary64) r (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/5040 binary64) r) (+.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)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 #s(literal 1/24 binary64) r))))) (*.f64 #s(literal -1/2 binary64) r))))))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) r)))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) r)))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (+.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 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (/.f64 (*.f64 b r) (*.f64 a a)))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (*.f64 b (+.f64 (/.f64 r (*.f64 a a)) (/.f64 (*.f64 b r) a))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (*.f64 b (fma.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 b r) (*.f64 a a)) (/.f64 r a)) (/.f64 r (*.f64 a a)))))
#s(approx (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a)) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 r (*.f64 a a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 r a)) (*.f64 #s(literal -1 binary64) (/.f64 r a))))) (/.f64 r a)) (/.f64 r (*.f64 a a)))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) (*.f64 a a))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) a)))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r a) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 b r) (*.f64 a a))))))))
#s(approx (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r a) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))) a) (*.f64 #s(literal -1/3 binary64) (/.f64 r (*.f64 a a))))))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) a)))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 b r) (*.f64 #s(literal -1 binary64) (/.f64 r a)))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r a) (*.f64 b (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 b r) a)))))))
#s(approx (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r a) (*.f64 b (fma.f64 #s(literal -1 binary64) r (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))) (*.f64 #s(literal -1/3 binary64) (/.f64 r a)))))))))
#s(approx (* (/ r a) (tan b)) (/.f64 (*.f64 b r) a))
#s(approx (* (/ r a) (tan b)) (*.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 b b) r) a) (/.f64 r a))))
#s(approx (* (/ r a) (tan b)) (*.f64 b (fma.f64 (*.f64 b b) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 (*.f64 b b) r) a) (*.f64 #s(literal 1/3 binary64) (/.f64 r a))) (/.f64 r a))))
#s(approx (* (/ r a) (tan b)) (*.f64 b (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/3 binary64) (/.f64 r a) (*.f64 (*.f64 b b) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 (*.f64 b b) r) a) (*.f64 #s(literal 2/15 binary64) (/.f64 r a))))) (/.f64 r a))))
#s(approx (tan b) b)
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))))))
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b)))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) r)))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r)))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 (*.f64 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 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 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))
#s(approx (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 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 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 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 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 b b) r)))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/6 binary64) r (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r)))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/6 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/6 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/6 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal -1 binary64) r))))))))
#s(approx (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/6 binary64) r (*.f64 (*.f64 b b) (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/6 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/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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow (cos a) 2) 3/2) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (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 (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (*.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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #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 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (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 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (pow.f64 (cos.f64 a) #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 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #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 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#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 (* (* (* a a) a) (+ (* -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 (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a)) (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))) (*.f64 (pow.f64 a #s(literal 3 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))) (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 (pow (sin b) 2) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
#s(approx (pow (sin b) 4) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))
#s(approx (pow (cos b) 4) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (/ (+ (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (* -1 (/ (+ (* -1 (* (/ r a) (tan b))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) a))) a) (/.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))
#s(approx (* -1 (+ (* -1 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos b))))) (*.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 (/ (* r (pow (pow (sin b) 2) 3/2)) (pow (pow (cos b) 2) 3/2))) (* -1/2 (/ (* r (sin b)) (cos 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)))))
#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 (tan b) (tan.f64 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)))))

eval443.0ms (4.9%)

Memory
-17.7MiB live, 692.1MiB allocated; 105ms collecting garbage
Compiler

Compiled 270 501 to 11 187 computations (95.9% saved)

prune811.0ms (8.9%)

Memory
34.8MiB live, 1 284.4MiB allocated; 54ms collecting garbage
Pruning

17 alts after pruning (12 fresh and 5 done)

PrunedKeptTotal
New1 89881 906
Fresh145
Picked325
Done134
Total1 903171 920
Accuracy
99.9%
Counts
1 920 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.6%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
✓78.3%
(*.f64 r (/.f64 (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.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (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))))))))
✓99.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
81.9%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 r (/.f64 (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 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶99.4%
(*.f64 r (/.f64 (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 (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 (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))))))))
▶76.5%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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))))))))
60.9%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
✓99.5%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶66.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)))))))) (/.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 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
74.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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))))))
▶55.8%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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))))))
▶77.9%
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
✓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))))
✓19.7%
#s(approx (* 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))) (*.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)))))))))))
Compiler

Compiled 2 272 to 963 computations (57.6% saved)

series308.0ms (3.4%)

Memory
-7.4MiB live, 477.2MiB allocated; 85ms collecting garbage
Counts
78 → 489
Calls
Call 1
Inputs
(*.f64 r (/.f64 (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 (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 (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))))))))
r
(/.f64 (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 (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 (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)))))))
(sin.f64 b)
b
(/.f64 (-.f64 (*.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 (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)))) (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 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.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 (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 (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 (cos.f64 a) #s(literal 2 binary64))
(cos.f64 a)
a
#s(literal 2 binary64)
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(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 (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))
(sin.f64 a)
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 r (sin.f64 b))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(PI.f64)
(/.f64 (PI.f64) #s(literal 2 binary64))
(sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))
(-.f64 b (*.f64 #s(literal -1 binary64) a))
(*.f64 #s(literal -1 binary64) a)
#s(literal -1 binary64)
(*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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)))
(pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) #s(literal 3/2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))
(log.f64 (cos.f64 a))
#s(literal 3/2 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)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
#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 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
(-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
(*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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)))
(pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))
(log.f64 (cos.f64 b))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
Outputs
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (- b (* -1 a))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (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 (exp (* (log (cos a)) 2)) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #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) 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 (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 (* (sin a) (sin b)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))) (/ (* r (* (sin b) (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))) (/ (* r (* (sin b) (+ (* -1/6 (* (cos b) (sin (PI)))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI)))))) (* (cos b) (sin (PI)))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (sin b) (sin (PI)))) (* a (+ (* -1/6 (* (cos b) (sin (PI)))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (sin (PI)))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin b)))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin b) (* a (cos b)))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* -1/2 (* a (sin b))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* a (+ (* -1/2 (sin b)) (* -1/6 (* a (cos b))))))))))
#s(approx (- b (* -1 a)) #s(hole binary64 b))
#s(approx (- b (* -1 a)) #s(hole binary64 (+ a b)))
#s(approx (* -1 a) #s(hole binary64 (* -1 a)))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos b) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* -1 (* a (* (sin b) (sin (* 1/2 (PI)))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* -1/2 (* a (* (cos b) (sin (* 1/2 (PI)))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* 1/6 (* a (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos b)))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 1))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 1))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* (pow a 2) (- (* -1/6 (pow a 2)) 1))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* -2/45 (pow a 2)) 1/6)) 1))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* (pow a 2) (- (* -17/1260 (pow a 2)) 2/45)) 1/6)) 1))))
#s(approx (log (cos a)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (log (cos a)) #s(hole binary64 (* (pow a 2) (- (* -1/12 (pow a 2)) 1/2))))
#s(approx (log (cos a)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* -1/45 (pow a 2)) 1/12)) 1/2))))
#s(approx (log (cos a)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* (pow a 2) (- (* -17/2520 (pow a 2)) 1/45)) 1/12)) 1/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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #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 (sin b) 3)) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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) (exp (* (log (cos b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (* (pow (cos a) 2) (exp (* (log (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) (exp (* (log (cos b)) 2))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 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 b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#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 (cos a) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#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 a) #s(hole binary64 (sin a)))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (+ a b)) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (+ a b)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (+ a b)) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (+ a b))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (+ a b))))
#s(approx (- b (* -1 a)) #s(hole binary64 a))
#s(approx (- b (* -1 a)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (+ a b)) (sin (* 1/2 (PI))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (+ a 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 (* (sin b) (+ (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (pow (cos a) 3)))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* 2 (log (cos a)))))
#s(approx (log (cos a)) #s(hole binary64 (log (cos a))))
#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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (- b (* -1 a)))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (- b (* -1 a)))))
#s(approx (- b (* -1 a)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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 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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin 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 (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* b r) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (+ (/ (* r (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)) (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))) (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* b r) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))) (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) 2)) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (/ (* r (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))))) (/ (* r (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2)))) (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a)))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (+ (/ (* r (+ (* -1/6 (* (cos (neg (* -1 a))) (sin (PI)))) (* 1/6 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2)) (/ (* (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) (- (* -1/6 (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) 2)) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (/ (* r (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a)))))))))) (* -1/6 (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a)))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) 2)) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (/ (* r (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))))) (/ (* r (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2)))) (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 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 (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (* (cos (neg (* -1 a))) (sin (PI)))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))) (* b (+ (* -1/6 (* (cos (neg (* -1 a))) (sin (PI)))) (* 1/6 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI)))))))))) (* (cos (neg (* -1 a))) (sin (PI)))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (neg (* -1 a)))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin (neg (* -1 a))) (* b (cos (neg (* -1 a)))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin (neg (* -1 a))) (* b (+ (cos (neg (* -1 a))) (* -1/2 (* b (sin (neg (* -1 a))))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin (neg (* -1 a))) (* b (+ (cos (neg (* -1 a))) (* b (+ (* -1/2 (sin (neg (* -1 a)))) (* -1/6 (* b (cos (neg (* -1 a))))))))))))
#s(approx (- b (* -1 a)) #s(hole binary64 (- b (* -1 a))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* -1 (* b (* (sin (neg (* -1 a))) (sin (* 1/2 (PI)))))) (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* b (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))) (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* 1/6 (* b (* (sin (neg (* -1 a))) (sin (* 1/2 (PI)))))))))) (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (neg (* -1 a)))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos (neg (* -1 a))) (* -1 (* b (sin (neg (* -1 a))))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos (neg (* -1 a))) (* b (- (* -1/2 (* b (cos (neg (* -1 a))))) (sin (neg (* -1 a))))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos (neg (* -1 a))) (* b (- (* b (+ (* -1/2 (cos (neg (* -1 a)))) (* 1/6 (* b (sin (neg (* -1 a))))))) (sin (neg (* -1 a))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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 a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (* (pow (cos a) 2) (exp (* (log (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) (exp (* (log (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 (exp (* (log (cos b)) 2)) #s(hole binary64 1))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* (pow b 2) (- (* -1/6 (pow b 2)) 1))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* -2/45 (pow b 2)) 1/6)) 1))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* (pow b 2) (- (* -17/1260 (pow b 2)) 2/45)) 1/6)) 1))))
#s(approx (log (cos b)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (log (cos b)) #s(hole binary64 (* (pow b 2) (- (* -1/12 (pow b 2)) 1/2))))
#s(approx (log (cos b)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* -1/45 (pow b 2)) 1/12)) 1/2))))
#s(approx (log (cos b)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* (pow b 2) (- (* -17/2520 (pow b 2)) 1/45)) 1/12)) 1/2))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (- b (* -1 a)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#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 (sin b) 3) #s(hole binary64 (pow (sin b) 3)))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* 2 (log (cos b)))))
#s(approx (log (cos b)) #s(hole binary64 (log (cos b))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (neg (+ (* -1 a) (* -1 b)))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (+ (* -1 a) (* -1 b)))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (neg (+ (* -1 a) (* -1 b)))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (+ (* -1 a) (* -1 b))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (neg (+ (* -1 a) (* -1 b))))))
#s(approx (- b (* -1 a)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (neg (+ (* -1 a) (* -1 b)))) (sin (* 1/2 (PI))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (neg (+ (* -1 a) (* -1 b))))))
Calls

9 calls:

TimeVariablePointExpression
106.0ms
b
@inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (sin a) (pow (sin b) 2) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) 1/2 (PI) (/ (PI) 2) (sin (- b (* -1 a))) (- b (* -1 a)) (* -1 a) -1 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (cos (- b (* -1 a))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (exp (* (log (cos a)) 2)) 3/2) (exp (* (log (cos a)) 2)) (* (log (cos a)) 2) (log (cos a)) 3/2 (pow (pow (cos b) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin b) 3) (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (exp (* (log (cos b)) 2)) (* (log (cos b)) 2) (log (cos b)) (pow (* (sin a) (sin b)) 3))
45.0ms
b
@-inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (sin a) (pow (sin b) 2) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) 1/2 (PI) (/ (PI) 2) (sin (- b (* -1 a))) (- b (* -1 a)) (* -1 a) -1 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (cos (- b (* -1 a))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (exp (* (log (cos a)) 2)) 3/2) (exp (* (log (cos a)) 2)) (* (log (cos a)) 2) (log (cos a)) 3/2 (pow (pow (cos b) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin b) 3) (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (exp (* (log (cos b)) 2)) (* (log (cos b)) 2) (log (cos b)) (pow (* (sin a) (sin b)) 3))
40.0ms
a
@-inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (sin a) (pow (sin b) 2) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) 1/2 (PI) (/ (PI) 2) (sin (- b (* -1 a))) (- b (* -1 a)) (* -1 a) -1 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (cos (- b (* -1 a))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (exp (* (log (cos a)) 2)) 3/2) (exp (* (log (cos a)) 2)) (* (log (cos a)) 2) (log (cos a)) 3/2 (pow (pow (cos b) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin b) 3) (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (exp (* (log (cos b)) 2)) (* (log (cos b)) 2) (log (cos b)) (pow (* (sin a) (sin b)) 3))
37.0ms
a
@inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (sin a) (pow (sin b) 2) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) 1/2 (PI) (/ (PI) 2) (sin (- b (* -1 a))) (- b (* -1 a)) (* -1 a) -1 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (cos (- b (* -1 a))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (exp (* (log (cos a)) 2)) 3/2) (exp (* (log (cos a)) 2)) (* (log (cos a)) 2) (log (cos a)) 3/2 (pow (pow (cos b) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin b) 3) (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (exp (* (log (cos b)) 2)) (* (log (cos b)) 2) (log (cos b)) (pow (* (sin a) (sin b)) 3))
13.0ms
r
@-inf
((* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (sin b) b (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (cos a) 2) (cos a) a 2 (pow (cos b) 2) (cos b) (* (cos a) (cos b)) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (* (pow (sin a) 2) (pow (sin b) 2)) (pow (sin a) 2) (sin a) (pow (sin b) 2) (* (sin a) (sin b)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) 1/2 (PI) (/ (PI) 2) (sin (- b (* -1 a))) (- b (* -1 a)) (* -1 a) -1 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (cos (- b (* -1 a))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2))) (* (pow (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (exp (* (log (cos a)) 2)) 3/2) (exp (* (log (cos a)) 2)) (* (log (cos a)) 2) (log (cos a)) 3/2 (pow (pow (cos b) 2) 3/2) (* (pow (sin a) 3) (pow (pow (sin b) 2) 3/2)) (pow (sin a) 3) 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (pow (pow (cos a) 2) 3/2) (* (pow (sin a) 3) (pow (sin b) 3)) (pow (sin b) 3) (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (exp (* (log (cos b)) 2)) (* (log (cos b)) 2) (log (cos b)) (pow (* (sin a) (sin b)) 3))

rewrite268.0ms (2.9%)

Memory
1.5MiB live, 338.1MiB allocated; 46ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0197726060
0216122656
0814121897
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
567 → 735
Calls
Call 1
Inputs
(*.f64 r (/.f64 (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 (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 (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))))))))
r
(/.f64 (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 (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 (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)))))))
(sin.f64 b)
b
(/.f64 (-.f64 (*.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 (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)))) (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 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.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 (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 (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 (cos.f64 a) #s(literal 2 binary64))
(cos.f64 a)
a
#s(literal 2 binary64)
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(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 (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))
(sin.f64 a)
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 r (sin.f64 b))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(PI.f64)
(/.f64 (PI.f64) #s(literal 2 binary64))
(sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))
(-.f64 b (*.f64 #s(literal -1 binary64) a))
(*.f64 #s(literal -1 binary64) a)
#s(literal -1 binary64)
(*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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)))
(pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) #s(literal 3/2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))
(log.f64 (cos.f64 a))
#s(literal 3/2 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)))
(pow.f64 (sin.f64 a) #s(literal 3 binary64))
#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 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
(-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
(*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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)))
(pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(pow.f64 (sin.f64 b) #s(literal 3 binary64))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))
(log.f64 (cos.f64 b))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (- b (* -1 a))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (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 (exp (* (log (cos a)) 2)) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #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) 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 (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 (* (sin a) (sin b)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))) (/ (* r (* (sin b) (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))) (/ (* r (* (sin b) (+ (* -1/6 (* (cos b) (sin (PI)))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (sin (PI))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (sin b) (sin (PI)))))) (* (cos b) (sin (PI)))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (sin b) (sin (PI)))) (* a (+ (* -1/6 (* (cos b) (sin (PI)))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (sin (PI)))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (sin b) (sin (PI)))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin b)))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin b) (* a (cos b)))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* -1/2 (* a (sin b))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* a (+ (* -1/2 (sin b)) (* -1/6 (* a (cos b))))))))))
#s(approx (- b (* -1 a)) #s(hole binary64 b))
#s(approx (- b (* -1 a)) #s(hole binary64 (+ a b)))
#s(approx (* -1 a) #s(hole binary64 (* -1 a)))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos b) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* -1 (* a (* (sin b) (sin (* 1/2 (PI)))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* -1/2 (* a (* (cos b) (sin (* 1/2 (PI)))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* 1/6 (* a (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos b)))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 1))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 1))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* (pow a 2) (- (* -1/6 (pow a 2)) 1))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* -2/45 (pow a 2)) 1/6)) 1))))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* (pow a 2) (- (* -17/1260 (pow a 2)) 2/45)) 1/6)) 1))))
#s(approx (log (cos a)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (log (cos a)) #s(hole binary64 (* (pow a 2) (- (* -1/12 (pow a 2)) 1/2))))
#s(approx (log (cos a)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* -1/45 (pow a 2)) 1/12)) 1/2))))
#s(approx (log (cos a)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (* (pow a 2) (- (* -17/2520 (pow a 2)) 1/45)) 1/12)) 1/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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) #s(hole binary64 1))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (pow (cos a) 2) 3/2) #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 (sin b) 3)) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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) (exp (* (log (cos b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (* (pow (cos a) 2) (exp (* (log (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) (exp (* (log (cos b)) 2))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 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 b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#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 (cos a) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#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 a) #s(hole binary64 (sin a)))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (+ a b)) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (+ a b)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (+ a b)) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (+ a b))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (+ a b))))
#s(approx (- b (* -1 a)) #s(hole binary64 a))
#s(approx (- b (* -1 a)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (+ a b)) (sin (* 1/2 (PI))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (+ a 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 (* (sin b) (+ (* (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (exp (* (log (cos a)) 2)) 3/2) #s(hole binary64 (pow (cos a) 3)))
#s(approx (exp (* (log (cos a)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (log (cos a)) 2) #s(hole binary64 (* 2 (log (cos a)))))
#s(approx (log (cos a)) #s(hole binary64 (log (cos a))))
#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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (pow (cos a) 2) 3/2) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (- b (* -1 a)))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (- b (* -1 a)))))
#s(approx (- b (* -1 a)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) #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) (pow (cos b) 2)) (* (cos a) (cos b))) #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 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 (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 (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin 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 (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* b r) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (+ (/ (* r (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)) (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))) (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* b r) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))) (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) 2)) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (/ (* r (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))))) (/ (* r (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2)))) (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a)))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (+ (/ (* r (+ (* -1/6 (* (cos (neg (* -1 a))) (sin (PI)))) (* 1/6 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2)) (/ (* (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) (- (* -1/6 (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) 2)) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (/ (* r (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a)))))))))) (* -1/6 (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a)))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI)))) 2)) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 3))) (/ (* r (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2))))) (/ (* r (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI))))) (pow (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))) 2)))) (/ r (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 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 (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* (cos (neg (* -1 a))) (sin (PI))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))))) (* (cos (neg (* -1 a))) (sin (PI)))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (sin (PI)) (sin (neg (* -1 a))))) (* b (+ (* -1/6 (* (cos (neg (* -1 a))) (sin (PI)))) (* 1/6 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI)))))))))) (* (cos (neg (* -1 a))) (sin (PI)))))) (+ (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (* -1 a))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (neg (* -1 a)))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin (neg (* -1 a))) (* b (cos (neg (* -1 a)))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin (neg (* -1 a))) (* b (+ (cos (neg (* -1 a))) (* -1/2 (* b (sin (neg (* -1 a))))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (+ (sin (neg (* -1 a))) (* b (+ (cos (neg (* -1 a))) (* b (+ (* -1/2 (sin (neg (* -1 a)))) (* -1/6 (* b (cos (neg (* -1 a))))))))))))
#s(approx (- b (* -1 a)) #s(hole binary64 (- b (* -1 a))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* -1 (* b (* (sin (neg (* -1 a))) (sin (* 1/2 (PI)))))) (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* -1/2 (* b (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))) (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin (neg (* -1 a))) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos (neg (* -1 a))) (sin (* 1/2 (PI))))) (* 1/6 (* b (* (sin (neg (* -1 a))) (sin (* 1/2 (PI)))))))))) (* (cos (neg (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (neg (* -1 a)))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos (neg (* -1 a))) (* -1 (* b (sin (neg (* -1 a))))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos (neg (* -1 a))) (* b (- (* -1/2 (* b (cos (neg (* -1 a))))) (sin (neg (* -1 a))))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (+ (cos (neg (* -1 a))) (* b (- (* b (+ (* -1/2 (cos (neg (* -1 a)))) (* 1/6 (* b (sin (neg (* -1 a))))))) (sin (neg (* -1 a))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (exp (* (log (cos a)) 2)) 3/2) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (pow (cos a) 2) 3/2) (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 (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (* (pow (sin a) 3) (pow (sin b) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (pow (sin b) 3) #s(hole binary64 (pow b 3)))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* -1/2 (pow b 2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* 13/120 (pow b 2)) 1/2))))))
#s(approx (pow (sin b) 3) #s(hole binary64 (* (pow b 3) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 13/120 (* -41/3024 (pow b 2)))) 1/2))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) (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) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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) (exp (* (log (cos b)) 2))) (* (cos a) (cos b))) #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 a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (* (pow (cos a) 2) (exp (* (log (cos b)) 2))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (* (pow (cos a) 2) (exp (* (log (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) (exp (* (log (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 (exp (* (log (cos b)) 2)) #s(hole binary64 1))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* (pow b 2) (- (* -1/6 (pow b 2)) 1))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* -2/45 (pow b 2)) 1/6)) 1))))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* (pow b 2) (- (* -17/1260 (pow b 2)) 2/45)) 1/6)) 1))))
#s(approx (log (cos b)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (log (cos b)) #s(hole binary64 (* (pow b 2) (- (* -1/12 (pow b 2)) 1/2))))
#s(approx (log (cos b)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* -1/45 (pow b 2)) 1/12)) 1/2))))
#s(approx (log (cos b)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (* (pow b 2) (- (* -17/2520 (pow b 2)) 1/45)) 1/12)) 1/2))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (- b (* -1 a)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#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 (sin b) 3) #s(hole binary64 (pow (sin b) 3)))
#s(approx (exp (* (log (cos b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (* (log (cos b)) 2) #s(hole binary64 (* 2 (log (cos b)))))
#s(approx (log (cos b)) #s(hole binary64 (log (cos b))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (neg (+ (* -1 a) (* -1 b)))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (+ (* -1 a) (* -1 b)))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) #s(hole binary64 (+ (* (cos (neg (+ (* -1 a) (* -1 b)))) (sin (* 1/2 (PI)))) (* (sin (PI)) (sin (neg (+ (* -1 a) (* -1 b))))))))
#s(approx (sin (- b (* -1 a))) #s(hole binary64 (sin (neg (+ (* -1 a) (* -1 b))))))
#s(approx (- b (* -1 a)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) #s(hole binary64 (* (cos (neg (+ (* -1 a) (* -1 b)))) (sin (* 1/2 (PI))))))
#s(approx (cos (- b (* -1 a))) #s(hole binary64 (cos (neg (+ (* -1 a) (* -1 b))))))
Outputs
(*.f64 r (/.f64 (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))))))))
r
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.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))))))))
(/.f64 (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 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))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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 (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))))) (fma.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/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 (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 (exp.f64 (log.f64 (cos.f64 a))) (exp.f64 (log.f64 (cos.f64 a))))
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (exp.f64 (log.f64 (cos.f64 a))) #s(literal 2 binary64))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
a
#s(literal 2 binary64)
(*.f64 (exp.f64 (log.f64 (cos.f64 b))) (exp.f64 (log.f64 (cos.f64 b))))
(*.f64 (cos.f64 b) (cos.f64 b))
(pow.f64 (exp.f64 (log.f64 (cos.f64 b))) #s(literal 2 binary64))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(*.f64 (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 (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)))
(sin.f64 a)
(*.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 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.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 (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))))))
(/.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 (*.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 (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)))))
(/.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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (neg.f64 (*.f64 r (sin.f64 b))) (neg.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 r (sin.f64 b))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))) (*.f64 (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(PI.f64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))
(-.f64 (*.f64 (sin.f64 b) (cos.f64 (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal -1 binary64) a))))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1 binary64) a))) (+.f64 b (*.f64 #s(literal -1 binary64) a)))
(/.f64 (-.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 #s(literal -1 binary64) a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (fma.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1 binary64) a) (*.f64 b (*.f64 #s(literal -1 binary64) a)))))
(-.f64 b (*.f64 #s(literal -1 binary64) a))
(*.f64 #s(literal -1 binary64) a)
#s(literal -1 binary64)
(*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal -1 binary64) a)) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal -1 binary64) a))))
(sin.f64 (+.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
(cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal -1 binary64) a))) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal -1 binary64) a))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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 (*.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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 (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))))) (fma.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 3 binary64)))
(*.f64 (exp.f64 (log.f64 (cos.f64 a))) (exp.f64 (log.f64 (cos.f64 a))))
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (exp.f64 (log.f64 (cos.f64 a))) #s(literal 2 binary64))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))))
(*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))
(log.f64 (cos.f64 a))
#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 (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)))
(*.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)))
#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)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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 (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 (*.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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 (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))))) (fma.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (/.f64 (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))))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.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))))))))
(/.f64 (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)))))))
(/.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))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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 (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))))) (fma.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (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 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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(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 (pow.f64 (cos.f64 a) #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 (pow.f64 (pow.f64 (cos.f64 a) #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))) (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 3/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 (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 (exp.f64 (log.f64 (cos.f64 b))) (exp.f64 (log.f64 (cos.f64 b))))
(*.f64 (cos.f64 b) (cos.f64 b))
(pow.f64 (exp.f64 (log.f64 (cos.f64 b))) #s(literal 2 binary64))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))))
(*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))
(log.f64 (cos.f64 b))
(*.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)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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 r)
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 a b)) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (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 (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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.f64 b))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos 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))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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) (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) (*.f64 (*.f64 a a) (pow.f64 (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) (*.f64 (*.f64 a a) (pow.f64 (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) (*.f64 (*.f64 a a) (pow.f64 (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 (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 (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 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 (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 (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (+.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 (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 b))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64)))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) #s(literal 0 binary64))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64)))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64)))))) (*.f64 (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))))) (*.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) #s(literal 0 binary64)))) (*.f64 (cos.f64 b) #s(literal 0 binary64)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 b) #s(literal 0 binary64)) (*.f64 a (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 b) #s(literal 0 binary64)))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 b) #s(literal 0 binary64)))))
#s(approx (sin (- b (* -1 a))) (sin.f64 b))
#s(approx (sin (- b (* -1 a))) (+.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
#s(approx (sin (- b (* -1 a))) (+.f64 (sin.f64 b) (*.f64 a (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 b)))))))
#s(approx (sin (- b (* -1 a))) (+.f64 (sin.f64 b) (*.f64 a (+.f64 (cos.f64 b) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 b)))))))))
#s(approx (- b (* -1 a)) b)
#s(approx (- b (* -1 a)) (+.f64 a b))
#s(approx (* -1 a) (*.f64 #s(literal -1 binary64) a))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (fma.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (fma.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 a (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (- b (* -1 a))) (cos.f64 b))
#s(approx (cos (- b (* -1 a))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (cos (- b (* -1 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 (* -1 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 (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos 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))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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 (pow (cos a) 2) 3/2) #s(literal 1 binary64))
#s(approx (pow (pow (cos a) 2) 3/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (*.f64 a a))))
#s(approx (pow (pow (cos a) 2) 3/2) (+.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 (pow (cos a) 2) 3/2) (+.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 (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 (* (log (cos a)) 2) (*.f64 #s(literal -1 binary64) (*.f64 a a)))
#s(approx (* (log (cos a)) 2) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 a a)) #s(literal 1 binary64))))
#s(approx (* (log (cos a)) 2) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 a a)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (* (log (cos a)) 2) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -17/1260 binary64) (*.f64 a a)) #s(literal 2/45 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (log (cos a)) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(approx (log (cos a)) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))
#s(approx (log (cos a)) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 a a)) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (log (cos a)) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -17/2520 binary64) (*.f64 a a)) #s(literal 1/45 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos 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))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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 (pow (cos a) 2) 3/2) #s(literal 1 binary64))
#s(approx (pow (pow (cos a) 2) 3/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (*.f64 a a))))
#s(approx (pow (pow (cos a) 2) 3/2) (+.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 (pow (cos a) 2) 3/2) (+.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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 (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (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 (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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.f64 b))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (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) (pow (cos b) 2)) (* (cos a) (cos 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))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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) (pow (cos b) 2)) (* (cos a) (cos b))) (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) (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) (*.f64 (*.f64 a a) (pow.f64 (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) (*.f64 (*.f64 a a) (pow.f64 (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) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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 b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (/.f64 (*.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 (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (/.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 (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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) (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 (cos a) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 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 a) (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b)))))
#s(approx (sin (- b (* -1 a))) (sin.f64 (+.f64 a b)))
#s(approx (- b (* -1 a)) a)
#s(approx (- b (* -1 a)) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (cos (- b (* -1 a))) (cos.f64 (+.f64 a 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 (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 (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow (cos a) 2) 3/2) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (pow (cos a) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (* (log (cos a)) 2) (log.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (log (cos a)) (log.f64 (cos.f64 a)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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 (pow (cos a) 2) 3/2) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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 b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (/.f64 (*.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 (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (/.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 (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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin 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))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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) (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 (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))))
#s(approx (sin (- b (* -1 a))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (- b (* -1 a)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (cos (- b (* -1 a))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx b b)
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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.f64 a))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/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) (*.f64 (*.f64 b b) (pow.f64 (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) (*.f64 (*.f64 b b) (pow.f64 (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) (*.f64 (*.f64 b b) (pow.f64 (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 (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 (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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 (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 (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 b r) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (*.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 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (+.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 a)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (/.f64 r (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (/.f64 (*.f64 r (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64)))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))) (/.f64 r (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (*.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 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (+.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64)) (*.f64 #s(literal 1/6 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (/.f64 (*.f64 r (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (/.f64 (*.f64 r (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64)))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))) (/.f64 r (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) 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 (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64)) (*.f64 #s(literal 1/6 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) #s(literal 0 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (sin (- b (* -1 a))) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))
#s(approx (sin (- b (* -1 a))) (+.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (*.f64 b (cos.f64 (*.f64 #s(literal -1 binary64) a)))))
#s(approx (sin (- b (* -1 a))) (+.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))))
#s(approx (sin (- b (* -1 a))) (+.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (*.f64 #s(literal -1 binary64) a))))))))))
#s(approx (- b (* -1 a)) (-.f64 b (*.f64 #s(literal -1 binary64) a)))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (fma.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 b (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (- b (* -1 a))) (cos.f64 (*.f64 #s(literal -1 binary64) a)))
#s(approx (cos (- b (* -1 a))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (*.f64 #s(literal -1 binary64) (*.f64 b (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (cos (- b (* -1 a))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 (*.f64 #s(literal -1 binary64) a)))) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (cos (- b (* -1 a))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) a)) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1 binary64) a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a))))))) (neg.f64 (sin.f64 (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/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 (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow (cos a) 2) 3/2) (pow (pow (cos b) 2) 3/2)) (* (pow (sin a) 3) (pow (sin b) 3)))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))))) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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.f64 a))
#s(approx (/ (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.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) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (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)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (- (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))))
#s(approx (* (* (pow (cos a) 2) (pow (cos b) 2)) (* (cos a) (cos b))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/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) (*.f64 (*.f64 b b) (pow.f64 (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) (*.f64 (*.f64 b b) (pow.f64 (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) (*.f64 (*.f64 b b) (pow.f64 (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 (* (log (cos b)) 2) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
#s(approx (* (log (cos b)) 2) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (* (log (cos b)) 2) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 b b)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (* (log (cos b)) 2) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -17/1260 binary64) (*.f64 b b)) #s(literal 2/45 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (log (cos b)) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
#s(approx (log (cos b)) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
#s(approx (log (cos b)) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 b b)) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (log (cos b)) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -17/2520 binary64) (*.f64 b b)) #s(literal 1/45 binary64))) #s(literal 1/12 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (* (* (pow (sin a) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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) 2) (pow (sin b) 2)) (* (sin a) (sin b))) (*.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 b) (sin.f64 b))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (cos b) (cos.f64 b))
#s(approx (pow (sin b) 2) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
#s(approx (- b (* -1 a)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#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 (sin b) 2) 3/2) (pow.f64 (pow.f64 (sin.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 (* (log (cos b)) 2) (log.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (log (cos b)) (log.f64 (cos.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1 binary64) b))))))))
#s(approx (+ (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))) (+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1 binary64) b)))))))
#s(approx (sin (- b (* -1 a))) (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (- b (* -1 a)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (cos (- b (* -1 a))) (cos.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1 binary64) b))))

eval289.0ms (3.2%)

Memory
-15.7MiB live, 449.9MiB allocated; 78ms collecting garbage
Compiler

Compiled 157 000 to 7 126 computations (95.5% saved)

prune756.0ms (8.3%)

Memory
3.8MiB live, 907.7MiB allocated; 103ms collecting garbage
Pruning

15 alts after pruning (8 fresh and 7 done)

PrunedKeptTotal
New1 57041 574
Fresh347
Picked325
Done055
Total1 576151 591
Accuracy
99.9%
Counts
1 591 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.6%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
✓78.3%
(*.f64 r (/.f64 (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.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (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))))))))
✓99.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
81.9%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 r (/.f64 (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 (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 (sin.f64 a) (sin.f64 b)))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
76.5%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.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))))))))
99.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 #s(approx (* (log (cos b)) 2) (log.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
81.8%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
✓55.8%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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))))))
✓77.9%
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
✓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))))
✓19.7%
#s(approx (* 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))) (*.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)))))))))))
Compiler

Compiled 3 376 to 853 computations (74.7% saved)

regimes40.0ms (0.4%)

Memory
29.4MiB live, 29.4MiB allocated; 0ms collecting garbage
Counts
28 → 1
Calls
Call 1
Inputs
#s(approx (* 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))) (*.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 (* 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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 (pow.f64 (cos.f64 a) #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 (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 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 #s(approx (* (log (cos b)) 2) (log.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.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 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.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 (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)))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.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 (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)))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (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 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (cos.f64 a) #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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (*.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)))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
Calls

5 calls:

7.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
7.0ms
b
7.0ms
r
7.0ms
a
7.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
99.5%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
99.5%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
99.5%1r
99.5%1a
99.5%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes21.0ms (0.2%)

Memory
-22.4MiB live, 23.9MiB allocated; 2ms collecting garbage
Counts
11 → 3
Calls
Call 1
Inputs
#s(approx (* 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))) (*.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 (* 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 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 (pow.f64 (cos.f64 a) #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 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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 (pow.f64 (cos.f64 a) #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 (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 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64)))) (sin.f64 a)) (cos.f64 a)) #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (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))) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 1/6 binary64))))) b (/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 a)) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Outputs
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
Calls

5 calls:

5.0ms
r
4.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
4.0ms
b
4.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
3.0ms
a
Results
AccuracySegmentsBranch
90.1%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
83.7%2(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
85.6%3r
86.1%3a
89.8%3b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes13.0ms (0.1%)

Memory
17.6MiB live, 17.6MiB allocated; 0ms collecting garbage
Counts
5 → 3
Calls
Call 1
Inputs
#s(approx (* 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))) (*.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 (* 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #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 (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))))))
Outputs
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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) (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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))))))
Calls

4 calls:

4.0ms
r
3.0ms
a
2.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
2.0ms
b
Results
AccuracySegmentsBranch
80.4%2r
85.4%3a
77.9%1b
77.9%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Compiler

Compiled 10 to 16 computations (-60% saved)

regimes12.0ms (0.1%)

Memory
15.5MiB live, 15.5MiB allocated; 0ms collecting garbage
Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (* 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))) (*.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 (* 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
Outputs
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
Calls

4 calls:

3.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
3.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
3.0ms
r
3.0ms
a
Results
AccuracySegmentsBranch
77.9%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
77.9%1r
77.9%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
77.9%1a
Compiler

Compiled 18 to 21 computations (-16.7% saved)

regimes14.0ms (0.2%)

Memory
-28.6MiB live, 16.4MiB allocated; 5ms collecting garbage
Counts
2 → 1
Calls
Call 1
Inputs
#s(approx (* 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))) (*.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 (* 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

5 calls:

2.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
2.0ms
r
2.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
1.0ms
b
1.0ms
a
Results
AccuracySegmentsBranch
59.6%1b
59.6%1a
59.6%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
59.6%1r
59.6%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes6.0ms (0.1%)

Memory
12.5MiB live, 12.5MiB allocated; 0ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (+ (* (+ (* (- (* (* -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)))))))))))
Outputs
#s(approx (* 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))) (*.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)))))))))))
Calls

5 calls:

1.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
1.0ms
a
1.0ms
r
1.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
1.0ms
b
Results
AccuracySegmentsBranch
19.7%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
19.7%1b
19.7%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
19.7%1a
19.7%1r
Compiler

Compiled 19 to 24 computations (-26.3% saved)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
0.021143038129400653
0.10810881809182536
0.0ms
-0.018092601644815652
-0.00028976821336862884
Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch50.0ms (0.6%)

Memory
10.3MiB live, 58.7MiB allocated; 8ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
33.0ms
523355236.7827497
1014840468594.9824
14.0ms
-2.6547805152090536e-5
-7.17093527799637e-6
Samples
31.0ms152×1valid
4.0ms56×0valid
Compiler

Compiled 3 379 to 1 327 computations (60.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-cos: 8.0ms (34.8% of total)
ival-sin: 5.0ms (21.8% of total)
adjust: 4.0ms (17.4% of total)
ival-add: 2.0ms (8.7% of total)
ival-div: 2.0ms (8.7% of total)
ival-mult: 2.0ms (8.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify77.0ms (0.8%)

Memory
-6.7MiB live, 82.9MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
0210939
1424913
21379894
36693891
Stop Event
1×node limit
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/576460752303423488 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal 5764607523034235/144115188075855872 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))))
(if (<=.f64 a #s(literal -6788401819125115/295147905179352825856 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)))))) (if (<=.f64 a #s(literal 530000000 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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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)))) #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)))))))))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/576460752303423488 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (if (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal 5764607523034235/144115188075855872 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))))
(if (or (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal -5764607523034235/576460752303423488 binary64)) (not (<=.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) #s(literal 5764607523034235/144115188075855872 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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) #s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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)))))))
(if (<=.f64 a #s(literal -6788401819125115/295147905179352825856 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)))))) (if (<=.f64 a #s(literal 530000000 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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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))))))))
(if (or (<=.f64 a #s(literal -6788401819125115/295147905179352825856 binary64)) (not (<=.f64 a #s(literal 530000000 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) (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)))))
#s(approx (* r (/ (sin b) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 b a)) (*.f64 (cos.f64 (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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))))
#s(approx (* 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))) (*.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 (* 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))) (*.f64 (*.f64 #s(literal -1 binary64) (*.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 (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 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 r a) (tan.f64 b)) (/.f64 (*.f64 #s(literal -1 binary64) (*.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) a))) (*.f64 #s(literal -1 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))))))))))

derivations238.0ms (2.6%)

Memory
-8.6MiB live, 182.7MiB allocated; 45ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 965 to 208 computations (78.4% saved)

preprocess105.0ms (1.2%)

Memory
23.8MiB live, 114.6MiB allocated; 32ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 2 076 to 528 computations (74.6% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...